emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/git-commit 7270895db9 2/3: No longer use -->


From: ELPA Syncer
Subject: [nongnu] elpa/git-commit 7270895db9 2/3: No longer use -->
Date: Sat, 30 Apr 2022 05:58:21 -0400 (EDT)

branch: elpa/git-commit
commit 7270895db9f3ad8ae7f6f5cc88ba672b04879442
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    No longer use -->
    
    We now use `thread-first' and `thread-last', but there is no macro
    corresponding to Dash's `-->' available in Emacs.  Let's just not
    use any of Dash's threading macros and instead uglify this single
    location where we still did.
---
 lisp/magit-git.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/magit-git.el b/lisp/magit-git.el
index 9266141778..8da334f79c 100644
--- a/lisp/magit-git.el
+++ b/lisp/magit-git.el
@@ -700,9 +700,9 @@ See info node `(magit)Debugging Tools' for more 
information."
 (defun magit-config-get-from-cached-list (key)
   (gethash
    ;; `git config --list' downcases first and last components of the key.
-   (--> key
-     (replace-regexp-in-string "\\`[^.]+" #'downcase it t t)
-     (replace-regexp-in-string "[^.]+\\'" #'downcase it t t))
+   (let* ((key (replace-regexp-in-string "\\`[^.]+" #'downcase key t t))
+          (key (replace-regexp-in-string "[^.]+\\'" #'downcase key t t)))
+     key)
    (magit--with-refresh-cache (cons (magit-toplevel) 'config)
      (let ((configs (make-hash-table :test #'equal)))
        (dolist (conf (magit-git-items "config" "--list" "-z"))



reply via email to

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