aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/gnus/gnus-start.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el
index eb19ff36f68..cce201e1f11 100644
--- a/lisp/gnus/gnus-start.el
+++ b/lisp/gnus/gnus-start.el
@@ -1992,7 +1992,7 @@ backend check whether the group actually exists."
1992 (let ((hashtb (setq gnus-active-hashtb (gnus-make-hashtable 4096)))) 1992 (let ((hashtb (setq gnus-active-hashtb (gnus-make-hashtable 4096))))
1993 (dolist (list (list gnus-killed-list gnus-zombie-list)) 1993 (dolist (list (list gnus-killed-list gnus-zombie-list))
1994 (dolist (group list) 1994 (dolist (group list)
1995 (gnus-sethash (string-as-unibyte group) nil hashtb))))) 1995 (gnus-sethash group nil hashtb)))))
1996 1996
1997(defun gnus-get-killed-groups () 1997(defun gnus-get-killed-groups ()
1998 "Go through the active hashtb and mark all unknown groups as killed." 1998 "Go through the active hashtb and mark all unknown groups as killed."