mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-17 08:31:09 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/gnus/gnus-score.el (gnus-all-score-files): Use copy-sequence instead of

Browse source 
copy-list.
This commit is contained in:
Andreas Schwab 2011-08-13 10:55:53 +02:00
parent 62f1ca498c
commit 1bca59fe75
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -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

2
lisp/gnus/gnus-score.el
View file

@ -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