summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/ChangeLog5
-rw-r--r--lisp/gnus/gnus-score.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 8fc250d1dcb..660bc8966e7 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2011-08-13 Andreas Schwab <schwab@linux-m68k.org>
+
+ * gnus-score.el (gnus-all-score-files): Use copy-sequence instead of
+ copy-list.
+
2011-08-12 Sam Steingold <sds@gnu.org>
* gnus-score.el (gnus-score-find-alist): Keep the score files already
diff --git a/lisp/gnus/gnus-score.el b/lisp/gnus/gnus-score.el
index 099d06d6439..eb7234a811e 100644
--- a/lisp/gnus/gnus-score.el
+++ b/lisp/gnus/gnus-score.el
@@ -2864,7 +2864,7 @@ The list is determined from the variable `gnus-score-file-alist'."
(when gnus-score-use-all-scores
;; Get the initial score files for this group.
(when funcs
- (setq score-files (copy-list (gnus-score-find-alist group))))
+ (setq score-files (copy-sequence (gnus-score-find-alist group))))
;; Add any home adapt files.
(let ((home (gnus-home-score-file group t)))
(when home