summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-08-24 16:32:17 +0000
committerRichard M. Stallman <rms@gnu.org>1997-08-24 16:32:17 +0000
commit6a338071bab00e156e59cca579a2721f90a8ba21 (patch)
treed37a935c8e3a48d89dbba9bc326c546cc4839b40 /lisp
parent5e9f80a8d5a9c3351a3595e855d5d06201199427 (diff)
downloademacs-6a338071bab00e156e59cca579a2721f90a8ba21.tar.gz
(rmail-view-buffer): Doc fix.
(rmail-summary-buffer, rmail-summary-vector): Mark as permanent local. (rmail-buffer): Add defvar and mark as permanent local.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mail/rmail.el10
1 files changed, 9 insertions, 1 deletions
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.