diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/message.el | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 8bd32cfc667..26e551d1ad7 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2007-11-21 Reiner Steib <Reiner.Steib@gmx.de> + + * message.el (message-send-mail-function): Require sendmail. + 2007-11-20 Reiner Steib <Reiner.Steib@gmx.de> * message.el (message-send-mail-function): Check for smtpmail too. diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 157c6f08b19..ef49e29d2cb 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -625,7 +625,9 @@ Done before generating the new subject of a forward." (defun message-send-mail-function () "Return suitable value for the variable `message-send-mail-function'." - (cond ((and sendmail-program + (cond ((and (require 'sendmail) + (boundp 'sendmail-program) + sendmail-program (executable-find sendmail-program)) 'message-send-mail-with-sendmail) ((and (locate-library "smtpmail") |