Put new Gnus groups in the completion table

* lisp/gnus/gnus-start.el (gnus-group-change-level): Ensure that
all new groups are in gnus-active-hashtb so that they can be
completed to.

1 files changed, 4 insertions, 0 deletions

diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el
index cb369f07b92..e142c438ee0 100644
--- a/lisp/gnus/gnus-start.el
+++ b/lisp/gnus/gnus-start.el
@@ -1269,6 +1269,10 @@ string name) to insert this group before."
              (consp entry))
         (setq oldlevel (gnus-info-level (nth 1 entry)))
       (setq oldlevel (or oldlevel gnus-level-killed)))
+
+    ;; This table is used for completion, so put a dummy entry there.
+    (unless (gethash group gnus-active-hashtb)
+      (setf (gethash group gnus-active-hashtb) nil))
     ;; Group is already subscribed.
     (unless (and (>= oldlevel gnus-level-zombie)
                  (gnus-group-entry group))