(rmail-summary-rmail-update): Set message

unseen only if `rmail-summary-put-back-unseen' is non-nil.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index f93547107497bd62e42c9b761d983d429dbe90e0..0e07116fba2a8e14f78da5dc14f090754ae6dfaf 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -772,8 +772,9 @@ Search, the `unseen' attribute is restored.")
                    ;; If we first saw the previous message in this search,
                    ;; and we have gone to a different message while searching,
                    ;; put back `unseen' on the former one.
+                   (if rmail-summary-put-back-unseen
                    (rmail-set-attribute "unseen" t
-                                        rmail-current-message)
+                                        rmail-current-message))
                    ;; Arrange to do that later, for the new current message,
                    ;; if it still has `unseen'.
                    (setq rmail-summary-put-back-unseen