From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 28 Jun 1996 08:25:40 +0000 (+0000)
Subject: (mail-reply-buffer, mail-send-actions):
X-Git-Tag: emacs-19.34~316
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=98bd608d04d6b6f980da96311a3319a27d61d20d;p=emacs.git

(mail-reply-buffer, mail-send-actions):
Mark them as permanent-local.
(mail-mode): Don't set mail-reply-buffer to nil.
---

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index da3707f2179..516aad5128f 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -164,6 +164,8 @@ If t, it means to insert the contents of the file `mail-signature-file'.")
 (defvar mail-reply-buffer nil)
 (defvar mail-send-actions nil
   "A list of actions to be performed upon successful sending of a message.")
+(put 'mail-reply-buffer 'permanent-local t)
+(put 'mail-send-actions 'permanent-local t)
 
 (defvar mail-default-headers nil
   "*A string containing header lines, to be inserted in outgoing messages.
@@ -315,7 +317,6 @@ C-c C-v  mail-sent-via (add a Sent-via field for each To or CC)."
   (interactive)
   (kill-all-local-variables)
   (make-local-variable 'mail-reply-buffer)
-  (setq mail-reply-buffer nil)
   (make-local-variable 'mail-send-actions)
   (set-syntax-table mail-mode-syntax-table)
   (use-local-map mail-mode-map)