diff options
| author | Ted Zlatanov <tzz@lifelogs.com> | 2017-12-19 20:01:08 -0500 |
|---|---|---|
| committer | Ted Zlatanov <tzz@lifelogs.com> | 2017-12-19 20:01:11 -0500 |
| commit | 675a4e13cf14ff5bff61d06454269983844a8f91 (patch) | |
| tree | f8b52bfb6610c4f7db7bd84784adab5a8054cde1 /lisp/auth-source.el | |
| parent | 24efda1d28496d4eeadf794033f9d6f52b08f0e1 (diff) | |
| download | emacs-675a4e13cf14ff5bff61d06454269983844a8f91.tar.gz | |
* lisp/auth-source.el (auth-source-backends-parser-file): Fix missing stringp.
Diffstat (limited to 'lisp/auth-source.el')
| -rw-r--r-- | lisp/auth-source.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/auth-source.el b/lisp/auth-source.el index 152c5af59ae..e6582fa796a 100644 --- a/lisp/auth-source.el +++ b/lisp/auth-source.el @@ -386,7 +386,8 @@ soon as a function returns non-nil.") (equal (file-name-extension source) "gpg")) (file-name-sans-extension source) (or source ""))) - (extension (or (file-name-extension source-without-gpg) + (extension (or (and (stringp source-without-gpg) + (file-name-extension source-without-gpg)) ""))) (when (stringp source) (cond |