From 5f7a3e3424bc0c9f6750b8a13b8dbae669bbd649 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 14 Feb 2011 01:35:22 +0000 Subject: [PATCH] auth-source.el (auth-source-search): Use copy-sequence instead of the cl.el copy-list. --- lisp/ChangeLog | 5 +++++ lisp/auth-source.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b64da04a0..7cb48a459 100644 --- a/lisp/ChangeLog +++ b/lisp/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 Teodor Zlatanov * imap.el: Bring it back (revert diff --git a/lisp/auth-source.el b/lisp/auth-source.el index b7a7b4104..de6926248 100644 --- a/lisp/auth-source.el +++ b/lisp/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.25.1