[Emacs-diffs] Changes to emacs/lisp/mail/sendmail.el

[Luc Teirlinck]

Index: emacs/lisp/mail/sendmail.el
diff -u emacs/lisp/mail/sendmail.el:1.299 emacs/lisp/mail/sendmail.el:1.300
--- emacs/lisp/mail/sendmail.el:1.299   Fri Dec  9 16:44:16 2005
+++ emacs/lisp/mail/sendmail.el Wed Dec 28 16:38:27 2005
@@ -123,6 +123,15 @@
   :type 'regexp
   :group 'sendmail)
 
+;; Revent problems with `window-system' not having the correct value
+;; when loaddefs.el is loaded. `custom-reevaluate-setting' needs the
+;; standard value.
+;;;###autoload
+(put 'send-mail-function 'standard-value
+     '((if (and window-system (memq system-type '(darwin windows-nt)))
+          'mailclient-send-it
+        'sendmail-send-it)))
+
 ;; Useful to set in site-init.el
 ;;;###autoload
 (defcustom send-mail-function