Re: Gnus redownloading headers on entry.

[Reiner Steib]

On Thu, Oct 12 2006, François-Denis Gonthier wrote:

> My latest Gnus annoyance is that: sometimes (not all the time), when I
> enter a newsgroup that has new message, Gnus will redownload all
> headers.  I've spied him using Ethereal and I see he does something
> like XOVER 1-94953, which doesn't quite make sense to me.  It results
> that it takes me 10 seconds to enter a newgroups with just 2 or 3 news
> messages.
>
> Could be it related to me setting gnus-fetch-old-headers to some?

Yes, `some' leads to "XOVER 1-HIGH" (HIGH = highest article number in
the group).  I'm not sure if it could be avoided.

> I had it set to t, but I still think setting it to some would not
> mean he'd download all messages.

Try setting it to a number.  This should lead to "XOVER 1-N" (N
= lowest unread article number minus gnus-fetch-old-headers), see
`nntp-retrieve-headers-with-xover' for details.

You don't need Ethereal, simply set `nntp-retrieve-headers-with-xover'
to t and look into the *nntp-log*" buffer.

For me, the slow part is not XOVER, but the following HEAD commands
which are cause by my scoring rules.  These rules partly score on
non-XOVER headers, so Gnus send HEAD for each article.  If this is the
problem, it should disappear if `gnus-use-scoring' is nil [1].

Bye, Reiner.

[1] Or try this patch and set `gnus-score-fast-scoring' to t.

--8<---------------cut here---------------start------------->8---
--- gnus-score.el       08 Feb 2006 13:32:49 +0100      7.28
+++ gnus-score.el       12 Oct 2006 22:10:46 +0200      
@@ -422,6 +422,11 @@
   :group 'gnus-score-various
   :type 'boolean)
 
+(defcustom gnus-score-fast-scoring nil
+  "If non-nil, no scoring on headers or body is done."
+  :group 'gnus-score-various
+  :type 'boolean)
+
 
 
 ;; Internal variables.
@@ -1541,8 +1546,11 @@
                                        (length (gnus-score-get header score)))
                                      scores)))
                ;; Call the scoring function for this type of "header".
-               (when (setq new (funcall (nth 2 entry) scores header
-                                        now expire trace))
+               (when (if (and gnus-score-fast-scoring
+                              (> 0 (nth 1 (assoc header gnus-header-index))))
+                         nil
+                       (setq new (funcall (nth 2 entry) scores header
+                                          now expire trace)))
                  (push new news))))
            (when (gnus-buffer-live-p gnus-summary-buffer)
              (let ((scored gnus-newsgroup-scored))
--8<---------------cut here---------------end--------------->8---
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/