From 46eb6df45358f413847ceb882898b2326f7584c8 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 29 Sep 2019 12:38:44 +0200 Subject: [PATCH] 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. --- lisp/gnus/gnus-start.el | 4 ++++ 1 file changed, 4 insertions(+) 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)) -- 2.39.2