Mercurial > emacs
changeset 107569:a62278954f43
2010-03-29 Teodor Zlatanov <tzz@lifelogs.com>
* auth-source.el (auth-source-pick): Fix for non-secrets specifier.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Mon, 29 Mar 2010 09:29:19 +0000 |
| parents | 510ea81324e3 (current diff) 3350692f1a89 (diff) |
| children | 3ce6e8cd52f1 ed0efa62bd7d |
| files | |
| diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Sun Mar 28 23:57:34 2010 +0000 +++ b/lisp/gnus/ChangeLog Mon Mar 29 09:29:19 2010 +0000 @@ -1,3 +1,7 @@ +2010-03-29 Teodor Zlatanov <tzz@lifelogs.com> + + * auth-source.el (auth-source-pick): Fix for non-secrets specifier. + 2010-03-27 Teodor Zlatanov <tzz@lifelogs.com> * auth-source.el (auth-sources): Change default to be simpler. Explain
--- a/lisp/gnus/auth-source.el Sun Mar 28 23:57:34 2010 +0000 +++ b/lisp/gnus/auth-source.el Mon Mar 29 09:29:19 2010 +0000 @@ -214,7 +214,7 @@ (dolist (choice auth-sources) (let* ((s (plist-get choice :source)) ;; this is only set for Secret Service API specs (see secrets.el) - (coll (plist-get s :secrets)) + (coll (and (consp s) (plist-get s :secrets))) (score 0)) (cond (coll ; use secrets.el here