From: Andrew G Cohen <cohen@andy.bu.edu>
Date: Wed, 16 Oct 2019 06:18:11 +0000 (+0800)
Subject: Remove ephemeral groups from gnus-newsrc-alist
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=519ac18125ae05d7edd75e12e929fbbf79778bf3;p=emacs.git

Remove ephemeral groups from gnus-newsrc-alist

* lisp/gnus/gnus.el (gnus-kill-ephemeral-group): Remove group from
  gnus-newsrc-alist.
---

diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index 4549610f81c..07397dc3010 100644
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -3169,7 +3169,10 @@ that that variable is buffer-local to the summary buffers."
 
 (defun gnus-kill-ephemeral-group (group)
   "Remove ephemeral GROUP from relevant structures."
-  (remhash group gnus-newsrc-hashtb))
+  (remhash group gnus-newsrc-hashtb)
+  (setq gnus-newsrc-alist
+	(delq (assoc group gnus-newsrc-alist)
+              gnus-newsrc-alist)))
 
 (defun gnus-simplify-mode-line ()
   "Make mode lines a bit simpler."