changeset 1664:5345766220da

* sendmail.el (mail-self-blind, mail-interactive, mail-yank-ignored-headers): Make these defvars, not defconsts. Otherwise, they wipe out the user's customizations when we autoload sendmail.el.
author Jim Blandy <jimb@redhat.com>
date Sun, 06 Dec 1992 22:42:10 +0000
parents a5eec33a8f44
children 4383bffb2ad9
files lisp/mail/sendmail.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Sun Dec 06 22:41:11 1992 +0000
+++ b/lisp/mail/sendmail.el	Sun Dec 06 22:42:10 1992 +0000
@@ -24,18 +24,18 @@
 ;;; Code:
 
 ;;;###autoload
-(defconst mail-self-blind nil "\
+(defvar mail-self-blind nil "\
 Non-nil means insert BCC to self in messages to be sent.
 This is done when the message is initialized,
 so you can remove or alter the BCC field to override the default.")
 
 ;;;###autoload
-(defconst mail-interactive nil "\
+(defvar mail-interactive nil "\
 Non-nil means when sending a message wait for and display errors.
 nil means let mailer mail back a message to report errors.")
 
 ;;;###autoload
-(defconst mail-yank-ignored-headers "^via:\\|^mail-from:\\|^origin:\\|^status:\\|^remailed\\|^received:\\|^message-id:\\|^summary-line:\\|^to:\\|^subject:\\|^in-reply-to:\\|^return-path:" "\
+(defvar mail-yank-ignored-headers "^via:\\|^mail-from:\\|^origin:\\|^status:\\|^remailed\\|^received:\\|^message-id:\\|^summary-line:\\|^to:\\|^subject:\\|^in-reply-to:\\|^return-path:" "\
 Delete these headers from old message when it's inserted in a reply.")
 
 ;; Useful to set in site-init.el