diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-08-04 23:19:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-08-04 23:19:50 +0000 |
| commit | 197af78153e3481dc08543129b3fda562dc452f2 (patch) | |
| tree | dfc9be58472eeb4de7bd5bb12ceee9f78dc30cf5 /lisp/paths.el | |
| parent | b3c01f467a5b337897211c59594f6a621aadc3da (diff) | |
| download | emacs-197af78153e3481dc08543129b3fda562dc452f2.tar.gz | |
(sendmail-program): Try /usr/sbin/sendmail.el also.
Diffstat (limited to 'lisp/paths.el')
| -rw-r--r-- | lisp/paths.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/paths.el b/lisp/paths.el index 9e1b8f8e94a..ea97278faf3 100644 --- a/lisp/paths.el +++ b/lisp/paths.el @@ -108,11 +108,11 @@ Will use `gnus-startup-file'-SERVER instead if exists.") Its name should end with a slash.") (defconst sendmail-program - (if (file-exists-p "/usr/lib/sendmail") - "/usr/lib/sendmail" - (if (file-exists-p "/usr/ucblib/sendmail") - "/usr/ucblib/sendmail" - "fakemail")) ;In ../etc, to interface to /bin/mail. + (cond + ((file-exists-p "/usr/lib/sendmail") "/usr/lib/sendmail") + ((file-exists-p "/usr/sbin/sendmail") "/usr/sbin/sendmail") + ((file-exists-p "/usr/ucblib/sendmail") "/usr/ucblib/sendmail") + (t "fakemail")) ;In ../etc, to interface to /bin/mail. "Program used to send messages.") (defconst term-file-prefix (if (eq system-type 'vax-vms) "[.term]" "term/") |