# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 872375803 0
# Node ID 50eec8e7a0054b16d104db672d87079f7d7b09fc
# Parent  4280cff2553766b9719aaf776d47061ad9d895e0
(nnfolder-generate-active-file): Don't use remove.

diff -r 4280cff25537 -r 50eec8e7a005 lisp/gnus/nnfolder.el
--- 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)