Mercurial > emacs

changeset 19495:50eec8e7a005

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(nnfolder-generate-active-file): Don't use remove.
author Richard M. Stallman <rms@gnu.org>
date Sat, 23 Aug 1997 22:36:43 +0000
parents 4280cff25537
children 77c68461cbb0
files lisp/gnus/nnfolder.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/nnfolder.el	Sat Aug 23 20:31:08 1997 +0000
+++ b/lisp/gnus/nnfolder.el	Sat Aug 23 22:36:43 1997 +0000
@@ -740,7 +740,9 @@
           (if oldgroup
               (nnheader-message 5 "Refreshing group %s..." file)
             (nnheader-message 5 "Adding group %s..." file))
-          (setq nnfolder-group-alist (remove oldgroup nnfolder-group-alist))
+	  (if oldgroup
+	      (setq nnfolder-group-alist
+		    (delq oldgroup (copy-sequence nnfolder-group-alist))))
           (push (list file (cons 1 0)) nnfolder-group-alist)
           (nnfolder-possibly-change-folder file)
           (nnfolder-possibly-change-group file)