diff lisp/paths.el @ 4454:5acc13b477c7

(sendmail-program): Try /usr/sbin/sendmail.el also.
author Richard M. Stallman <rms@gnu.org>
date Wed, 04 Aug 1993 23:19:50 +0000
parents 4728125f5873
children 4d3426d8b92a
line wrap: on
line diff
--- a/lisp/paths.el	Wed Aug 04 23:02:10 1993 +0000
+++ b/lisp/paths.el	Wed Aug 04 23:19:50 1993 +0000
@@ -108,11 +108,11 @@
 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/")