diff options
| -rw-r--r-- | lisp/gnus/gnus-start.el | 2 |
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." |