X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-nocem.el;h=086b9f490b66fbb91e87bbeb42612311ca81f709;hb=d7ba7616a9115179847f440eae631c3e9dd769e8;hp=38bd5525f73db422a37055d6105708e49fa5a746;hpb=368c970b11fa709a8622f14c681bf42351b29542;p=elisp%2Fgnus.git- diff --git a/lisp/gnus-nocem.el b/lisp/gnus-nocem.el index 38bd552..086b9f4 100644 --- a/lisp/gnus-nocem.el +++ b/lisp/gnus-nocem.el @@ -1,6 +1,6 @@ ;;; gnus-nocem.el --- NoCeM pseudo-cancellation treatment -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2002 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2002, 2004 ;; Free Software Foundation, Inc. @@ -298,7 +298,8 @@ valid issuer, which is much faster if you are selective about the issuers." (while (search-forward "\t" nil t) (cond ((not (ignore-errors - (setq group (let ((obarray gnus-active-hashtb)) (read buf))))) + (setq group (let ((obarray gnus-nocem-real-group-hashtb)) + (read buf))))) ;; An error. ) ((not (symbolp group))