Commit ac1af635 authored by Glenn Morris's avatar Glenn Morris
Browse files

Close bug#5643.

* message.el (message-send-mail-function): Change the default, so that
it inherits from a customized send-mail-function.  (Bug#5643)
parent 90a94603
2010-02-26 Glenn Morris <rgm@gnu.org>
* message.el (message-send-mail-function): Change the default, so that
it inherits from a customized send-mail-function. (Bug#5643)
2010-02-24 Stefan Monnier <monnier@iro.umontreal.ca>
* gnus-art.el (gnus-treat-display-x-face): Don't burp if
......
......@@ -675,7 +675,12 @@ Done before generating the new subject of a forward."
(error "Don't know how to send mail. Please customize `message-send-mail-function'")))))
;; Useful to set in site-init.el
(defcustom message-send-mail-function (message-send-mail-function)
(defcustom message-send-mail-function
(cond ((eq send-mail-function 'smtpmail-send-it) 'message-smtpmail-send-it)
((eq send-mail-function 'feedmail-send-it) 'feedmail-send-it)
((eq send-mail-function 'mailclient-send-it)
'message-send-mail-with-mailclient)
(t (message-send-mail-function)))
"Function to call to send the current buffer as mail.
The headers should be delimited by a line whose contents match the
variable `mail-header-separator'.
......@@ -698,7 +703,7 @@ See also `send-mail-function'."
:tag "Use Mailclient package")
(function :tag "Other"))
:group 'message-sending
:version "23.1" ;; No Gnus
:version "23.2"
:initialize 'custom-initialize-default
:link '(custom-manual "(message)Mail Variables")
:group 'message-mail)
......
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