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 | 9c85ef9fe1dfc4f825647670f46ad21b8501bf0a (patch) | |
| tree | 3039f0364ddffdf438fd27091805c569fc58107d /lisp/paths.el | |
| parent | 34fa2dc2e5f4138059f305483f8cbcb20349c422 (diff) | |
| download | emacs-9c85ef9fe1dfc4f825647670f46ad21b8501bf0a.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/") |