mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-25 10:47:00 +00:00
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.
This commit is contained in:
parent
6e0cac4896
commit
47081bf23b
@ -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)
|
||||
|
Loading…
Reference in New Issue
Block a user