diff lisp/gnus/gnus-start.el @ 120:cca96a509cfe r20-1b12

Import from CVS: tag r20-1b12
author cvs
date Mon, 13 Aug 2007 09:25:29 +0200
parents 7d55a9ba150c
children d2f30a177268
line wrap: on
line diff
--- a/lisp/gnus/gnus-start.el	Mon Aug 13 09:24:19 2007 +0200
+++ b/lisp/gnus/gnus-start.el	Mon Aug 13 09:25:29 2007 +0200
@@ -1467,6 +1467,7 @@
     (while alist
       (gnus-sethash
        (caar alist)
+       ;; Preserve number of unread articles in groups.
        (cons (and ohashtb (car (gnus-gethash (caar alist) ohashtb)))
 	     prev)
        gnus-newsrc-hashtb)