emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 47081bf: Tweak auth-source-pass.el to avoid run-tim


From: Glenn Morris
Subject: [Emacs-diffs] master 47081bf: Tweak auth-source-pass.el to avoid run-time subr-x
Date: Tue, 2 May 2017 16:59:57 -0400 (EDT)

branch: master
commit 47081bf23bedf8e2e567f2adfe2e5cc9466caa27
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    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.
---
 lisp/auth-source-pass.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el
index e5de184..529e302 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]