[Emacs-diffs] master ca5f9c9: Make "unseen" tracking work again in Gnus

[Lars Ingebrigtsen]

branch: master
commit ca5f9c97e6c78c1816ac4422736cf2bd7fdbb80b
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Make "unseen" tracking work again in Gnus
    
    * lisp/gnus/gnus-sum.el (gnus-update-marks): Make "unseen"
    tracking work again.
---
 lisp/gnus/gnus-sum.el |    5 +++++
 1 files changed, 5 insertions(+), 0 deletions(-)

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index adb9b02..d3e5ece 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -6036,6 +6036,11 @@ If SELECT-ARTICLES, only select those articles from 
GROUP."
                (setq arts (cdr arts)))
              (setq list (cdr all)))))
 
+       ;; When exiting the group, everything that's previously been
+       ;; unseen is now seen.
+       (when (eq (cdr type) 'seen)
+         (setq list (gnus-range-add list gnus-newsgroup-unseen)))
+
        (when (eq (gnus-article-mark-to-type (cdr type)) 'list)
          (setq list (gnus-compress-sequence (set symbol (sort list '<)) t)))