diff options
author | Andreas Schwab <schwab@linux-m68k.org> | 2011-07-08 19:02:01 +0200 |
---|---|---|
committer | Andreas Schwab <schwab@linux-m68k.org> | 2011-07-08 19:02:01 +0200 |
commit | f042cfd86a8dadc9fa559f102213de09a019c527 (patch) | |
tree | 5ad9e8d7f80cf18a142211e2e3fcf7804d556cdc | |
parent | 3fe4b54936ae48b8d30458bb9cac2912a9ecc09a (diff) | |
download | emacs-f042cfd86a8dadc9fa559f102213de09a019c527.tar.gz |
* lisp/mail/sendmail.el (send-mail-function): No longer delay custom
initialization.
* lisp/custom.el (custom-initialize-delay): Doc fix.
-rw-r--r-- | lisp/ChangeLog | 6 | ||||
-rw-r--r-- | lisp/custom.el | 6 | ||||
-rw-r--r-- | lisp/mail/sendmail.el | 11 |
3 files changed, 10 insertions, 13 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4a9dd27b840..729013ba54c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2011-07-08 Andreas Schwab <schwab@linux-m68k.org> + + * mail/sendmail.el (send-mail-function): No longer delay custom + initialization. + * custom.el (custom-initialize-delay): Doc fix. + 2011-07-08 Stefan Monnier <monnier@iro.umontreal.ca> * abbrev.el (expand-abbrev): Try to preserve point (bug#5805). diff --git a/lisp/custom.el b/lisp/custom.el index a5c0065036a..4f69c741468 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -120,8 +120,10 @@ the :set function. For variables in preloaded files, you can simply use this function for the :initialize property. For autoloaded variables, you will also need to add an autoload stanza calling this -function, and another one setting the standard-value property. -See `send-mail-function' in sendmail.el for an example." +function, and another one setting the standard-value property." + ;; No longer true: + ;; "See `send-mail-function' in sendmail.el for an example." + ;; Until the var is actually initialized, it is kept unbound. ;; This seemed to be at least as good as setting it to an arbitrary ;; value like nil (evaluating `value' is not an option because it diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index b14c7e50137..5ffc834f533 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -138,14 +138,6 @@ Otherwise, let mailer send back a message to report errors." :group 'sendmail :version "23.1") -;; Prevent 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 - ;; MS-Windows can access the clipboard even under -nw. - '('sendmail-query-once)) - ;; Useful to set in site-init.el ;;;###autoload (defcustom send-mail-function 'sendmail-query-once @@ -161,7 +153,6 @@ This is used by the default mail-sending commands. See also (function-item feedmail-send-it :tag "Use Feedmail package") (function-item mailclient-send-it :tag "Use Mailclient package") function) - :initialize 'custom-initialize-delay :version "24.1" :group 'sendmail) @@ -212,8 +203,6 @@ function to use, and then save that choice." (setq sendmail-query-once-function function)))) (funcall sendmail-query-once-function)) -;;;###autoload(custom-initialize-delay 'send-mail-function nil) - ;;;###autoload (defcustom mail-header-separator (purecopy "--text follows this line--") "Line used to separate headers from text in messages being composed." |