(gnus-group-set-mode-line): Allow user defined specs in the group

format mode line.

diff --git a/lisp/gnus.el b/lisp/gnus.el
index cd12431adaf4bf75b4368fb0ea5d20722e8c61cc..d12951e9d4fb1155dd1f9a0f89f6f48223b286e6 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -3787,6 +3787,7 @@ If VISIBLE-ONLY is non-nil, the group won't be displayed if it isn't already."
             (news-server (car (cdr gnus-select-method)))
             (news-method (car gnus-select-method))
             (max-len 60)
+            header                     ;Dummy binding for user-defined specs.
             (mode-string (eval gformat)))
        (setq mode-string (eval gformat))
        (if (> (length mode-string) max-len)