Commit 3ff0518e authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(sendmail-send-it): Look at `sendmail-program'

in caller buffer.
parent 23c6089e
......@@ -798,7 +798,11 @@ external program defined by `sendmail-program'."
;;; resend-to-addresses
delimline
fcc-was-found
(mailbuf (current-buffer)))
(mailbuf (current-buffer))
(program (if (boundp 'sendmail-program)
sendmail-program
"/usr/lib/sendmail"))
(originator user-mail-address))
(unwind-protect
(save-excursion
(set-buffer tembuf)
......@@ -962,12 +966,10 @@ external program defined by `sendmail-program'."
(select-message-coding-system)))
(args
(append (list (point-min) (point-max)
(if (boundp 'sendmail-program)
sendmail-program
"/usr/lib/sendmail")
program
nil errbuf nil "-oi")
(and mail-specify-envelope-from
(list "-f" user-mail-address))
(list "-f" originator))
;;; ;; Don't say "from root" if running under su.
;;; (and (equal (user-real-login-name) "root")
;;; (list "-f" (user-login-name)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment