From 18bd0025d9e2a91e76a31b80dc2a80b314ab58b3 Mon Sep 17 00:00:00 2001 From: Henrik Enberg Date: Fri, 27 Apr 2007 18:28:08 +0000 Subject: [PATCH] (rmail-perm-variables): Make sure rmail-desc-vector is buffer local. --- lisp/mail/ChangeLog | 4 +++- lisp/mail/rmail.el | 3 +++ 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/mail/ChangeLog b/lisp/mail/ChangeLog index aed14a1c838..71e77869438 100644 --- a/lisp/mail/ChangeLog +++ b/lisp/mail/ChangeLog @@ -3,7 +3,9 @@ * rmailout.el (rmail-output): Don't bind buffer-file-coding-system. - * rmail.el (rmail-mime-charset-pattern): Sync with trunk. + * rmail.el (rmail-perm-variables): Make sure rmail-desc-vector is + buffer local. + (rmail-mime-charset-pattern): Sync with trunk. (rmail): Don't bind coding-system-for-read. (rmail-revert): Likewise. (rmail-variables): Don't set buffer-file-coding-system. diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 0f65fc8b58e..a6994a1e883 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -1131,6 +1131,7 @@ Instead, these commands are available: (make-local-variable 'rmail-total-messages) (make-local-variable 'rmail-overlay-list) (setq rmail-overlay-list nil) + (make-local'variable 'rmail-desc-vector) (make-local-variable 'rmail-inbox-list) (setq rmail-inbox-list (rmail-get-file-inbox-list)) ;; Provide default set of inboxes for primary mail file ~/RMAIL. @@ -1464,6 +1465,8 @@ updated file. It returns t if it got any new messages." ;; Process the new messages for spam using the integrated ;; spam filter. The spam filter can mark messages for ;; deletion and can output a message. + ;; XXX rmail-spam-filter hasn't been tested at all with + ;; the mbox branch. --enberg (setq current-message (rmail-first-unseen-message)) (when rmail-use-spam-filter (while (<= current-message rmail-total-messages) -- 2.39.5