Mercurial > emacs

changeset 66126:5aebfc4d20d5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(send-mail-function): Use mailclient-send-it as default on darwin and windows systems.
author Richard M. Stallman <rms@gnu.org>
date Sun, 16 Oct 2005 17:51:51 +0000
parents 772d50287662
children 158a650cbb46
files lisp/mail/sendmail.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Sun Oct 16 17:06:40 2005 +0000
+++ b/lisp/mail/sendmail.el	Sun Oct 16 17:51:51 2005 +0000
@@ -120,7 +120,10 @@
 
 ;; 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,