From 6a338071bab00e156e59cca579a2721f90a8ba21 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 24 Aug 1997 16:32:17 +0000 Subject: [PATCH] (rmail-view-buffer): Doc fix. (rmail-summary-buffer, rmail-summary-vector): Mark as permanent local. (rmail-buffer): Add defvar and mark as permanent local. --- lisp/mail/rmail.el | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 2b4c8c6553a..55e2b01719b 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -250,6 +250,12 @@ before obeying `rmail-ignored-headers'.") (defvar rmail-inbox-list nil) (defvar rmail-keywords nil) +(defvar rmail-buffer nil + "The RMAIL buffer related to the current buffer. +In an RMAIL buffer, this holds the RMAIL buffer itself. +In a summary buffer, this holds the RMAIL buffer it is a summary for.") +(put 'rmail-buffer 'permanent-local t) + ;; Message counters and markers. Deleted flags. (defvar rmail-current-message nil) @@ -289,7 +295,9 @@ by substituting the new message number into the existing list.") ;; These are used by autoloaded rmail-summary. (defvar rmail-summary-buffer nil) +(put 'rmail-summary-buffer 'permanent-local t) (defvar rmail-summary-vector nil) +(put 'rmail-summary-vector 'permanent-local t) ;; `Sticky' default variables. @@ -387,7 +395,7 @@ by substituting the new message number into the existing list.") (rmail-maybe-display-summary)))) (defvar rmail-view-buffer nil - "Buffer which holds RMAIL message for displaying.") + "Buffer which holds RMAIL message for MIME displaying.") ;; Mule and MIME related variables. -- 2.39.2