# HG changeset patch # User Richard M. Stallman # Date 835950340 0 # Node ID e4a1ba2cfdba2d8eafeee3566f7d31ed3b586d76 # Parent 74530b877334aed32b5d01aa17b620d5a0b09434 (mail-reply-buffer, mail-send-actions): Mark them as permanent-local. (mail-mode): Don't set mail-reply-buffer to nil. diff -r 74530b877334 -r e4a1ba2cfdba lisp/mail/sendmail.el --- a/lisp/mail/sendmail.el Fri Jun 28 08:21:49 1996 +0000 +++ b/lisp/mail/sendmail.el Fri Jun 28 08:25:40 1996 +0000 @@ -164,6 +164,8 @@ (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 @@ (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)