diff options
author | Glenn Morris <rgm@gnu.org> | 2011-05-12 19:10:17 -0700 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2011-05-12 19:10:17 -0700 |
commit | 9d463c8c03a29e28720a0d2a9d0610f08c3b65f7 (patch) | |
tree | eedd65bef9db02e20ede1f0651012eb82959f7b2 /lisp/gnus/message.el | |
parent | 5237a44fef24911b77fd6e4f55c0e319f9747641 (diff) | |
download | emacs-9d463c8c03a29e28720a0d2a9d0610f08c3b65f7.tar.gz |
message.el trivia.
* lisp/gnu/message.el (message-send-mail-with-sendmail): Assume
sendmail-program is bound, since this function requires sendmail.
Diffstat (limited to 'lisp/gnus/message.el')
-rw-r--r-- | lisp/gnus/message.el | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 0971aed0e02..0ba877ec648 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -4656,16 +4656,7 @@ If you always want Gnus to send messages in one piece, set (cpr (apply 'call-process-region (append - (list (point-min) (point-max) - (cond ((boundp 'sendmail-program) - sendmail-program) - ((file-exists-p "/usr/sbin/sendmail") - "/usr/sbin/sendmail") - ((file-exists-p "/usr/lib/sendmail") - "/usr/lib/sendmail") - ((file-exists-p "/usr/ucblib/sendmail") - "/usr/ucblib/sendmail") - (t "fakemail")) + (list (point-min) (point-max) sendmail-program nil errbuf nil "-oi") message-sendmail-extra-arguments ;; Always specify who from, |