Mercurial > hg > xemacs-beta
comparison lisp/paths.el @ 183:e121b013d1f0 r20-3b18
Import from CVS: tag r20-3b18
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:54:23 +0200 |
parents | 376386a54a3c |
children | 41ff10fd062f |
comparison
equal
deleted
inserted
replaced
182:f07455f06202 | 183:e121b013d1f0 |
---|---|
214 ;; let's assume this dir is never used for anything else. | 214 ;; let's assume this dir is never used for anything else. |
215 ((file-exists-p "/var/mail") | 215 ((file-exists-p "/var/mail") |
216 "/var/mail/") | 216 "/var/mail/") |
217 ((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix)) | 217 ((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix)) |
218 "/usr/mail/") | 218 "/usr/mail/") |
219 ((memq system-type '(linux)) | |
220 "/var/spool/mail/") | |
219 (t "/usr/spool/mail/"))) | 221 (t "/usr/spool/mail/"))) |
220 | 222 |
221 (funcall | 223 (funcall |
222 l 'sendmail-program | 224 l 'sendmail-program |
223 (cond | 225 (cond |