(gnus-summary-from-or-to-or-newsgroups): Check

gnus-extra-headers for 'Newsgroups.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 30fc8b9..cdbd915 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2006-04-04  Reiner Steib  <Reiner.Steib@gmx.de>
 
+       * gnus-sum.el (gnus-summary-from-or-to-or-newsgroups): Check
+       gnus-extra-headers for 'Newsgroups.
+
        * message.el (message-tool-bar-gnome): Check if `flyspell-mode' is
        bound.
 

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 0a3a6ce..aaa624e 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -3526,6 +3526,7 @@ buffer that was in action when the last article was fetched."
                    (or
                     (cdr (assq 'Newsgroups extra-headers))
                     (and
+                     (memq 'Newsgroups gnus-extra-headers)
                       (eq (car (gnus-find-method-for-group
                                 gnus-newsgroup-name)) 'nntp)
                      (gnus-group-real-name gnus-newsgroup-name))))