Re: nnshimbun-request-scan fetches unsubscribed server groups

[Matt Lundin <mdl@xxxxxxxxxxxx>]

Matt Lundin <mdl@xxxxxxxxxxxx> writes:

> Katsumi Yamaoka <yamaoka@xxxxxxx> writes:
>
>> Hmm, for me -group works but -scan doesn't.  Anyway I need to
>> learn more how the most recent Gnus works...
>
> You are right. With nnshimbun-request-scan, the groups are updated but
> not displayed at startup (i.e., no data about the groups is provided to
> Gnus).
>
> On the other hand, with nnshimbun-request-group, the groups are
> displayed but not updated.
>
> I believe that nnshimbun-request-group only updates the nov database
> (and article count) if the group is ephemeral and an .overview file does
> not already exist (lines 510-513). Thus, both at startup and when
> calling gnus-group-get-new-news, preexisting nnshimbun groups are not
> updated.
>
> Would it be possible to have nnshimbun-retrieve-groups call
> nnshimbun-request-scan *and* nnshimbun-request-group in succession?

On further review, I find that this does not work either, as it returns
data to Gnus on only one group per server. E.g., only one group in
rss-blogs is displayed, even though I have subscribed to multiple
groups. (This is also the case if nnshimbun-retrieve-groups only calls
nnshimbun-request-group.)

Per the gnus documentation, an nnchoke-retrieve-groups function needs to
provide data on all the groups in the server.[1] With the following
patch, all subscribed nnshimbun groups are both updated and displayed at
startup:

--- nnshimbun.el	2010-10-01 09:12:51.299472715 -0400
+++ nnshimbun-fix.el	2010-10-01 09:38:53.197623535 -0400
@@ -531,8 +531,10 @@
 (deffoo nnshimbun-retrieve-groups (groups &optional server)
   (when (nnshimbun-possibly-change-group nil server)
     (dolist (group groups)
+      (nnshimbun-request-scan group server)
       (nnshimbun-request-group group server))
-    t))
+    (nnshimbun-request-list server)
+    'active))
 
 (deffoo nnshimbun-close-group (group &optional server)
   (setq group (nnshimbun-decode-group-name group))

Best,
Matt

Footnotes:

[1] (info "(gnus) Optional Back End Functions")