From 41e4ae90b6805980a6728fbd65b7c80b05835f5a Mon Sep 17 00:00:00 2001 From: ueno Date: Tue, 24 Aug 1999 14:32:37 +0000 Subject: [PATCH] (gnus-group-line-format-alist): Add entry about the format specifier `w'. (gnus-group-line-format): Fix documentation. --- lisp/gnus-group.el | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el index 5cd3cd8..1d1ade3 100644 --- a/lisp/gnus-group.el +++ b/lisp/gnus-group.el @@ -156,7 +156,8 @@ with some simple extensions. %p Process mark (char) %O Moderated group (string, \"(m)\" or \"\") %P Topic indentation (string) -%m Whether there is new(ish) mail in the group (char, \"%\") +%m Whether there is new(ish) mails in the group (char, \"%\") +%w Number of new(ish) mail in the group (integer) %l Whether there are GroupLens predictions for this group (string) %n Select from where (string) %z A string that look like `<%s:%n>' if a foreign select method is used @@ -407,6 +408,13 @@ ticked: The number of ticked articles." (?l gnus-tmp-grouplens ?s) (?z gnus-tmp-news-method-string ?s) (?m (gnus-group-new-mail gnus-tmp-group) ?c) + (?w (if (gnus-news-group-p gnus-tmp-group) + "" + (int-to-string + (length + (nnmail-new-mail-numbers (gnus-group-real-name gnus-tmp-group)) + ))) + ?s) (?d (gnus-group-timestamp-string gnus-tmp-group) ?s) (?u gnus-tmp-user-defined ?s))) -- 1.7.10.4