procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

nnimap.el (nnimap-update-info): Simplify split history test.

Browse source
This commit is contained in:
Lars Ingebrigtsen 2011-02-07 22:49:38 +00:00 • committed by Katsumi Yamaoka
parent 226590f8d1
commit b52daf3d93
2 changed files with 6 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
lisp/gnus/ChangeLog
View file

@ -7,6 +7,7 @@
characters.
(nnimap-process-quirk): Renamed function to avoid collision.
(nnimap-update-info): Fix macrology bug-out.
(nnimap-update-info): Simplify split history test.
2011-02-06 Lars Ingebrigtsen <larsi@gnus.org>

12
lisp/gnus/nnimap.el
View file

@ -1342,13 +1342,11 @@ textual parts.")
;; Tell Gnus whether there are any \Recent messages in any of
;; the groups.
(let ((recent (cdr (assoc '%Recent flags))))
(when (and active recent)
(while recent
(when (> (car recent) (cdr active))
(push (list (cons (gnus-group-real-name group) 0))
nnmail-split-history)
(setq recent nil))
(pop recent))))
(when (and active
recent
(> (car (last recent)) (cdr active)))
(push (list (cons (gnus-group-real-name group) 0))
nnmail-split-history)))
;; Note the active level for the next run-through.
(gnus-group-set-parameter info 'active (gnus-active group))
(gnus-group-set-parameter info 'uidvalidity uidvalidity)