From ab3777910c2271256957d283fedb558324262e58 Mon Sep 17 00:00:00 2001 From: Paul Reilly Date: Mon, 1 Sep 2008 10:56:37 +0000 Subject: (pmail-reply-callback): Call pmail-show-message to repaint the message, insuring that new headers, like X-BABYL-V6... are correctly hidden. --- lisp/mail/pmail.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/mail/pmail.el b/lisp/mail/pmail.el index 72abe896fb..cfa6c3f95a 100644 --- a/lisp/mail/pmail.el +++ b/lisp/mail/pmail.el @@ -2782,7 +2782,8 @@ non-nil, otherwise clears it. N is the message number. BUFFER, possibly narrowed, contains an mbox mail message." (save-excursion (set-buffer buffer) - (pmail-set-attribute attr state n))) + (pmail-set-attribute attr state n) + (pmail-show-message))) (defun pmail-mark-message (msgnum-list attr-index) "Set attribute ATTRIBUTE-INDEX in the message of the car of MSGNUM-LIST. -- cgit v1.2.3