diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/message.el | 11 |
2 files changed, 6 insertions, 10 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 44abbea8e94..ceea1e0375f 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2011-05-13 Glenn Morris <rgm@gnu.org> + + * message.el (message-send-mail-with-sendmail): Assume sendmail-program + is bound, since this function requires sendmail. + 2011-05-11 Teodor Zlatanov <tzz@lifelogs.com> * registry.el (registry-usage-test): Disable pruning test. 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, |