diff options
| author | Daiki Ueno <ueno@gnu.org> | 2019-10-15 12:42:37 +0200 |
|---|---|---|
| committer | Daiki Ueno <ueno@gnu.org> | 2019-10-15 12:49:45 +0200 |
| commit | fcb89237d9ab969bcd29bf8f8fae8d9905644b92 (patch) | |
| tree | 965b62e595fcd9670c244c36d1d946ea864ee61b /lisp/auth-source.el | |
| parent | 42df8cd686f359de7a4f2d8c941ca8f8f05f4e0b (diff) | |
| download | emacs-fcb89237d9ab969bcd29bf8f8fae8d9905644b92.tar.gz | |
auth-source: Fix wrong-type-argument when searching plstore
`auth-source-search' can be called with an integer port number from
`network-stream-certificate`, while the backend implementation doesn't
allow non-string attributes.
* lisp/auth-source.el (auth-source-plstore-search): Ensure attributes
are string.
Diffstat (limited to 'lisp/auth-source.el')
| -rw-r--r-- | lisp/auth-source.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/auth-source.el b/lisp/auth-source.el index 1d3d8dba405..fdd869df3a6 100644 --- a/lisp/auth-source.el +++ b/lisp/auth-source.el @@ -2049,9 +2049,9 @@ entries for git.gnus.org: (if (or (null v) (eq t v)) nil - (if (stringp v) - (setq v (list v))) - (list k v)))) + (list + k + (auth-source-ensure-strings v))))) search-keys))) ;; needed keys (always including host, login, port, and secret) (returned-keys (delete-dups (append |