diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2011-02-14 01:38:00 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2011-02-14 01:38:00 +0000 |
| commit | 6ce6c7420c5863a611975f029b48ae7570f3b6a2 (patch) | |
| tree | 215adfc78b4f8a976e0cceed46a5c7eb8d0995d0 /lisp/gnus/auth-source.el | |
| parent | 461b69aeb4875d8770e974b552140efcecc2a94a (diff) | |
| download | emacs-6ce6c7420c5863a611975f029b48ae7570f3b6a2.tar.gz emacs-6ce6c7420c5863a611975f029b48ae7570f3b6a2.tar.bz2 emacs-6ce6c7420c5863a611975f029b48ae7570f3b6a2.zip | |
auth-source.el (auth-source-search): Use copy-sequence instead of the cl.el copy-list.
Diffstat (limited to 'lisp/gnus/auth-source.el')
| -rw-r--r-- | lisp/gnus/auth-source.el | 2 |
1 files changed, 1 insertions, 1 deletions
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 |