1 files changed, 5 insertions, 1 deletions

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 58f3dc3a6ef..144496bdd2a 100644
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -2560,7 +2560,11 @@ If FAR, it is likely that the group is not on the current line.
 If TEST-MARKED, the line must be marked."
   (when group
     (let ((start (point))
-          (active (and (gethash group gnus-newsrc-hashtb)
+          (active (and (or
+                        ;; some kind of group may be only there.
+                        (gethash group gnus-active-hashtb)
+                        ;; all groups (but with exception) are there.
+                        (gethash group gnus-newsrc-hashtb))
                        group)))
       (beginning-of-line)
       (cond