Problem with %a in topic line formats

Problem with %a in topic line formats

[Didier Verna]

  Hello,

I've recently upgraded a Homebrew emacs-mac distribution and got a new
error launching Gnus, which I tracked down to my topic line format using
the %a specifier.

Gnus complains at launch that "entries" is a void variable, and the
culprit I think is here:

(defconst gnus-topic-line-format-alist
  '((?n name ?s)
    (?v visible ?s)
    (?i indentation ?s)
    (?g number-of-groups ?d)
    (?a (gnus-topic-articles-in-topic entries) ?d)
    (?A total-number-of-articles ?d)
    (?l level ?d)))

When I compare this with another installation that still works on
another Mac, I can see that Emacs goes from 27.1 to 28.1, but Gnus stays
at version 5.13. However, there /is/ a difference, namely, the fact that
in the more recent installation, the gnus-topic library has a
lexical-binding on (in the file's header).

I suspect this is the problem. Is this known? I don't know where this
comes from, but it's unfortunate that there are differences between two
gnus installs that advertise the saem version...

Thanks!

-- 
Resistance is futile. You will be jazzimilated.

Lisp, Jazz, Aïkido: http://www.didierverna.info

Re: Problem with %a in topic line formats

[Andreas Schwab]

On Apr 20 2022, Didier Verna wrote:

> I've recently upgraded a Homebrew emacs-mac distribution and got a new
> error launching Gnus, which I tracked down to my topic line format using
> the %a specifier.
>
> Gnus complains at launch that "entries" is a void variable, and the
> culprit I think is here:
>
> (defconst gnus-topic-line-format-alist
>   '((?n name ?s)
>     (?v visible ?s)
>     (?i indentation ?s)
>     (?g number-of-groups ?d)
>     (?a (gnus-topic-articles-in-topic entries) ?d)
>     (?A total-number-of-articles ?d)
>     (?l level ?d)))

Does this help?

diff --git a/lisp/gnus/gnus-topic.el b/lisp/gnus/gnus-topic.el
index c079d889d9..281ed08963 100644
--- a/lisp/gnus/gnus-topic.el
+++ b/lisp/gnus/gnus-topic.el
@@ -650,6 +650,7 @@ gnus-topic-insert-topic-line
   (let* ((visible (if visiblep "" "..."))
 	 (level level)
 	 (name name)
+         (entries entries)
 	 (indentation (make-string (* gnus-topic-indent-level level) ? ))
 	 (total-number-of-articles unread)
 	 (number-of-groups (length entries))

-- 
Andreas Schwab, schwab@linux-m68k.org
GPG Key fingerprint = 7578 EB47 D4E5 4D69 2510  2552 DF73 E780 A9DA AEC1
"And now for something completely different."

Re: Problem with %a in topic line formats

[Didier Verna]

Andreas Schwab <schwab@linux-m68k.org> wrote:

> Does this help?

  It does!

Thanks.

-- 
Resistance is futile. You will be jazzimilated.

Lisp, Jazz, Aïkido: http://www.didierverna.info