From 6ce6c7420c5863a611975f029b48ae7570f3b6a2 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 14 Feb 2011 01:38:00 +0000 Subject: [PATCH] auth-source.el (auth-source-search): Use copy-sequence instead of the cl.el copy-list. --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/auth-source.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 1760b0f22fe..f156198a8e0 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2011-02-14 Katsumi Yamaoka + + * auth-source.el (auth-source-search): Use copy-sequence instead of + the cl.el copy-list. + 2011-02-13 Adam Sjøgren * gnus-delay.el (gnus-delay-article) Fix number of seconds per day. diff --git a/lisp/gnus/auth-source.el b/lisp/gnus/auth-source.el index b7a7b41049c..de6926248ab 100644 --- a/lisp/gnus/auth-source.el +++ b/lisp/gnus/auth-source.el @@ -485,7 +485,7 @@ must call it to obtain the actual value." (or (eq t create) (listp create)) t "Invalid auth-source :create parameter (must be nil, t, or a list)") - (setq filtered-backends (copy-list backends)) + (setq filtered-backends (copy-sequence backends)) (dolist (backend backends) (dolist (key keys) ;; ignore invalid slots -- 2.39.5