* auth-source.el (auth-source-pick): If choice does not contain a
questioned keyword, set the check to t.
This commit is contained in:
parent
8fd02581c8
commit
85350e06b0
2 changed files with 7 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2010-06-15 Michael Albinus <michael.albinus@gmx.de>
|
||||
|
||||
* auth-source.el (auth-source-pick): If choice does not contain a
|
||||
questioned keyword, set the check to t.
|
||||
|
||||
2010-06-12 Romain Francoise <romain@orebokech.com>
|
||||
|
||||
* gnus-util.el (gnus-date-get-time): Move up before first use.
|
||||
|
|
|
@ -229,7 +229,8 @@ matched as a regex."
|
|||
;; Check keywords.
|
||||
(dolist (k keys match)
|
||||
(let* ((v (plist-get spec k))
|
||||
(choicev (plist-get choice k)))
|
||||
(choicev (if (plist-member choice k)
|
||||
(plist-get choice k) t)))
|
||||
(setq match
|
||||
(and match
|
||||
(or
|
||||
|
|
Loading…
Add table
Reference in a new issue