diff lisp/gnus/gnus-start.el @ 69362:29fe34ec2296

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-147 Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 56) - Update from CVS
author Miles Bader <miles@gnu.org>
date Fri, 10 Mar 2006 23:43:54 +0000
parents 6c7c654eb3c7
children 30b1a277cc54 494bf720eaf0
line wrap: on
line diff
--- a/lisp/gnus/gnus-start.el	Fri Mar 10 23:22:30 2006 +0000
+++ b/lisp/gnus/gnus-start.el	Fri Mar 10 23:43:54 2006 +0000
@@ -1047,9 +1047,12 @@
       (gnus-check-bogus-newsgroups))
 
     ;; We might read in new NoCeM messages here.
-    (when (and gnus-use-nocem
-	       (not level)
-	       (not dont-connect))
+    (when (and (not dont-connect)
+	       gnus-use-nocem
+	       (or (and (numberp gnus-use-nocem)
+			(numberp level)
+			(>= level gnus-use-nocem))
+		   (not level)))
       (gnus-nocem-scan-groups))
 
     ;; Read any slave files.