From f87f756b17a7a23e31938abbfc78f1a8d09d0df6 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Mon, 6 Sep 2010 00:48:40 +0000 Subject: [PATCH] gnus-start.el (gnus-get-unread-articles): Fix up the last commit. --- lisp/gnus/ChangeLog | 1 + lisp/gnus/gnus-start.el | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 8af66bde01a..961518b964f 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -2,6 +2,7 @@ * gnus-start.el (gnus-get-unread-articles): Don't bother with groups that aren't going to be activated. + (gnus-get-unread-articles): Fix up the last commit. * gnus-html.el (gnus-article-html): Allow calling without specifying the handle. In that case, dissect the buffer first. diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index e7e4dfd928e..3bdcb05dbe5 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el @@ -1736,7 +1736,7 @@ If SCAN, request a scan of that group as well." type-cache)) ;; Only add groups that need updating. (when (<= (gnus-info-level info) - (if (eq method-type 'foreign) + (if (eq (cadr method-group-list) 'foreign) foreign-level alevel)) (setcar (nthcdr 2 method-group-list) -- 2.39.2