Re: Missing first group in group list

[Eric Abrahamsen <eric@ericabrahamsen.net>]

Juan José García-Ripoll <juanjose.garciaripoll@gmail.com> writes:

> Andreas Schwab <schwab@linux-m68k.org> writes:
>> On Jan 21 2021, Juan José García-Ripoll wrote:
>>
>>> Essentially the problem is in this function
>>>
>>> (defun gnus-group-prepare-flat (level &optional predicate lowest regexp)
>>>  ...
>>>       ;; List living groups, according to order in `gnus-group-list'.
>>>       (dolist (g (cdr gnus-group-list))
>>>         (setq info (gnus-get-info g)
>>> 	      group (gnus-info-group info)
>>>
>>> This function drops the first group in the list, probably because it
>>> assumes it is the dummy.group, but in my system it is never so.
>>
>> It looks like Gnus always tries to keep dummy.group at the head of the
>> group list, see the various references in gnus-start.el or
>> gnus-group.el.
>
> Hmmm, not really. I've debugged the gnus-group-list variable and it is
> changed twice: once to add dummy.group, and another one to add the
> subsequent group, in a chain of calls that starts in
> gnus-subscribe-group.
>
> The problem is this code:
>
> (defun gnus-subscribe-newsgroup (newsgroup &optional next)
>   "Subscribe new NEWSGROUP.
> If NEXT is non-nil, it is inserted before NEXT.  Otherwise it is made
> the first newsgroup."
>   (save-excursion
>     (goto-char (point-min))
>     ;; We subscribe the group by changing its level to `subscribed'.
>     (gnus-group-change-level
>      newsgroup gnus-level-default-subscribed
>      gnus-level-killed (or next "dummy.group"))
>
> It is called like (gnus-subscribe-newsgroup "The-new-group"
> "dummy.group") Note that by default NEXT is nil. This means that the
> next group that is inserted will be injected _before_ dummy.group and
> the order is destroyed.

Thanks for debugging! This is probably an error I introduced, and I'll
try to fix it this weekend. I appreciate this leg up.

Eric