Changes committed gnus/lisp (ChangeLog auth-source.el)

Modified: ChangeLog auth-source.el

(auth-source-pick): Fix for non-secrets specifier.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.2076 gnus/lisp/ChangeLog:7.2077
--- ChangeLog:7.2076	Sat Mar 27 21:01:28 2010
+++ ChangeLog	Mon Mar 29 12:20:06 2010
@@ -1,3 +1,7 @@
+2010-03-29  Teodor Zlatanov  <[email protected]>
+
+	* auth-source.el (auth-source-pick): Fix for non-secrets specifier.
+
 2010-03-27  Teodor Zlatanov  <[email protected]>
 
 	* auth-source.el (auth-sources): Change default to be simpler.  Explain
Index: auth-source.el
diff -u gnus/lisp/auth-source.el:7.22 gnus/lisp/auth-source.el:7.23
--- auth-source.el:7.22	Sat Mar 27 21:01:28 2010
+++ auth-source.el	Mon Mar 29 12:20:06 2010
@@ -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