# HG changeset patch
# User Alex Schroeder <alex@gnu.org>
# Date 1137714779 0
# Node ID 8a1f15a85efbf90cefa9454c1fd99bcefe8d2af0
# Parent  88a9102875c203d325e8b2fdc28613eba380dae3
(rmail-set-attribute): Call rmail-summary-update.

diff -r 88a9102875c2 -r 8a1f15a85efb lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Thu Jan 19 12:59:11 2006 +0000
+++ b/lisp/mail/rmail.el	Thu Jan 19 23:52:59 2006 +0000
@@ -1888,11 +1888,9 @@
 	(set-buffer rmail-buffer)
 	(or msgnum (setq msgnum rmail-current-message))
 	(rmail-desc-set-attribute attr-index state msgnum)
-
         ;; Deal with the summary buffer.
-        (if rmail-summary-buffer
-            (with-current-buffer rmail-summary-buffer
-              (rmail-summary-update-attribute attr-index msgnum)))))))
+        (when rmail-summary-buffer
+	  (rmail-summary-update msgnum))))))
 
 (defun rmail-message-labels-p (n labels)
   "Return t if message number N has keywords matching LABELS.