diff options
| author | Karl Heuer | 1998-06-04 06:47:29 +0000 |
|---|---|---|
| committer | Karl Heuer | 1998-06-04 06:47:29 +0000 |
| commit | 1dbd9103606128bc861a4210f14f1dbc08f05fb3 (patch) | |
| tree | a18bdc0103e87edc5218c92ef8b6ee2b932e63ee | |
| parent | 6a91b84a41870d33e83013178561f1515516afca (diff) | |
| download | emacs-1dbd9103606128bc861a4210f14f1dbc08f05fb3.tar.gz emacs-1dbd9103606128bc861a4210f14f1dbc08f05fb3.zip | |
(rmail-summary-rmail-update): Set message
unseen only if `rmail-summary-put-back-unseen' is non-nil.
| -rw-r--r-- | lisp/mail/rmailsum.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index f9354710749..0e07116fba2 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el | |||
| @@ -772,8 +772,9 @@ Search, the `unseen' attribute is restored.") | |||
| 772 | ;; If we first saw the previous message in this search, | 772 | ;; If we first saw the previous message in this search, |
| 773 | ;; and we have gone to a different message while searching, | 773 | ;; and we have gone to a different message while searching, |
| 774 | ;; put back `unseen' on the former one. | 774 | ;; put back `unseen' on the former one. |
| 775 | (if rmail-summary-put-back-unseen | ||
| 775 | (rmail-set-attribute "unseen" t | 776 | (rmail-set-attribute "unseen" t |
| 776 | rmail-current-message) | 777 | rmail-current-message)) |
| 777 | ;; Arrange to do that later, for the new current message, | 778 | ;; Arrange to do that later, for the new current message, |
| 778 | ;; if it still has `unseen'. | 779 | ;; if it still has `unseen'. |
| 779 | (setq rmail-summary-put-back-unseen | 780 | (setq rmail-summary-put-back-unseen |