auth-source.el (auth-source-search): Use copy-sequence instead of the cl.el copy...

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 1760b0f22fe6045ccdb1cc70893fc6bda2a5c019..f156198a8e0edd3922d75aed9a77bc183e060d55 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2011-02-14  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * auth-source.el (auth-source-search): Use copy-sequence instead of
+       the cl.el copy-list.
+
 2011-02-13  Adam Sjøgren  <asjo@koldfront.dk>
 
        * 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 b7a7b41049c6954d5c11ab00e24c28dc6feb6a4f..de6926248ab483f0b3a5eb99119f11c326271d79 100644 (file)
--- 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