diff options
| author | Glenn Morris <rgm@gnu.org> | 2017-05-02 16:59:51 -0400 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2017-05-02 16:59:51 -0400 |
| commit | 47081bf23bedf8e2e567f2adfe2e5cc9466caa27 (patch) | |
| tree | 70e0e77e6f4954bd6e1a6d1c00133e5b84309963 /lisp/auth-source-pass.el | |
| parent | 6e0cac4896f70b28b2a608fd63bc88b0253313bf (diff) | |
| download | emacs-47081bf23bedf8e2e567f2adfe2e5cc9466caa27.tar.gz | |
Tweak auth-source-pass.el to avoid run-time subr-x
* lisp/auth-source-pass.el (auth-source-pass--parse-data):
Avoid needing subr-x at run-time.
Diffstat (limited to 'lisp/auth-source-pass.el')
| -rw-r--r-- | lisp/auth-source-pass.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el index e5de18456b9..529e3024a62 100644 --- a/lisp/auth-source-pass.el +++ b/lisp/auth-source-pass.el @@ -32,7 +32,7 @@ ;;; Code: (require 'seq) -(require 'subr-x) +(eval-when-compile (require 'subr-x)) (eval-when-compile (require 'cl-lib)) (require 'auth-source) @@ -132,7 +132,7 @@ CONTENTS is the contents of a password-store formatted file." (let ((lines (split-string contents "\\\n" t "\\\s"))) (seq-remove #'null (mapcar (lambda (line) - (let ((pair (mapcar #'string-trim + (let ((pair (mapcar (lambda (s) (string-trim s)) (split-string line ":")))) (when (> (length pair) 1) (cons (car pair) |