[patch] `undownloaded' marks not displayed for `old' headers

[patch] `undownloaded' marks not displayed for `old' headers

[Mike McEwan]

A little annoyance I noticed. When selecting a group covered by the
Agent and limiting the number of articles to something less than that
available, the `gnus-undownloaded-mark' ?\@ is not displayed for `old' 
headers fetched because of `gnus-fetch-old-headers' being `t'.

The patch below fixes this for me:

--- ChangeLog.orig	Sat Jul 11 02:05:48 1998
+++ ChangeLog	Mon Jul 13 19:39:48 1998
@@ -1,3 +1,8 @@
+1998-07-13  Mike McEwan  <mike@lotusland.demon.co.uk>
+
+	* gnus-sum.el (gnus-select-newsgroup): Don't call the Agent to
+	mark articles as read until *all* headers have been retrieved.
+
 Sat Jul 11 03:03:53 1998  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
 
 	* gnus.el: Gnus v5.6.24 is released.
--- gnus-sum.el.orig	Sat Jul 11 02:05:50 1998
+++ gnus-sum.el	Mon Jul 13 19:22:38 1998
@@ -3915,15 +3915,15 @@
       ;; Removed marked articles that do not exist.
       (gnus-update-missing-marks
        (gnus-sorted-complement fetched-articles articles))
-      ;; Let the Gnus agent mark articles as read.
-      (when gnus-agent
-	(gnus-agent-get-undownloaded-list))
       ;; We might want to build some more threads first.
       (when (and gnus-fetch-old-headers
 		 (eq gnus-headers-retrieved-by 'nov))
 	(if (eq gnus-fetch-old-headers 'invisible)
 	    (gnus-build-all-threads)
 	  (gnus-build-old-threads)))
+      ;; Let the Gnus agent mark articles as read.
+      (when gnus-agent
+	(gnus-agent-get-undownloaded-list))
       ;; Check whether auto-expire is to be done in this group.
       (setq gnus-newsgroup-auto-expire
 	    (gnus-group-auto-expirable-p group))
 
-- 
Mike.