diff options
author | Richard M. Stallman <rms@gnu.org> | 2005-10-16 17:52:04 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2005-10-16 17:52:04 +0000 |
commit | 255d8b22d9ba941fe9a419c41a262e2de05ef3e5 (patch) | |
tree | fee5bcb57173c6f89a3b3d91e835b51e77aa0db0 /lisp/mail | |
parent | 74725d463cd0d51e0673daa4ca582bfc50598d14 (diff) | |
download | emacs-255d8b22d9ba941fe9a419c41a262e2de05ef3e5.tar.gz |
(send-mail-function): Use mailclient-send-it
as default on darwin and windows systems.
Diffstat (limited to 'lisp/mail')
-rw-r--r-- | lisp/mail/sendmail.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index f7c62026d80..81afe688c10 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -120,7 +120,10 @@ nil means let mailer mail back a message to report errors." ;; Useful to set in site-init.el ;;;###autoload -(defcustom send-mail-function 'sendmail-send-it +(defcustom send-mail-function + (if (and window-system (memq system-type '(darwin windows-nt))) + 'mailclient-send-it + 'sendmail-send-it) "Function to call to send the current buffer as mail. The headers should be delimited by a line which is not a valid RFC822 header or continuation line, |