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

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

[elpa] master 1046fc7 095/399: ivy.el (ivy-avy): Use non-obsolete avy-pr


From: Oleh Krehel
Subject: [elpa] master 1046fc7 095/399: ivy.el (ivy-avy): Use non-obsolete avy-process
Date: Sat, 20 Jul 2019 14:56:56 -0400 (EDT)

branch: master
commit 1046fc72a8e2117a3ec3e6dc9b979c488c8bc618
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    ivy.el (ivy-avy): Use non-obsolete avy-process
    
    In place of the now obsolete `avy--process'.
---
 ivy.el | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/ivy.el b/ivy.el
index 022b9b6..d0bc000 100644
--- a/ivy.el
+++ b/ivy.el
@@ -1573,7 +1573,7 @@ This string is inserted into the minibuffer."
          (avy-style (or (cdr (assq 'ivy-avy avy-styles-alist))
                         avy-style))
          (avy-action #'ivy--avy-action))
-    (avy--process
+    (avy-process
      (ivy--avy-candidates))))
 
 (defun ivy-sort-file-function-default (x y)
@@ -2838,14 +2838,14 @@ Possible choices are 
'ivy-magic-slash-non-match-cd-selected,
   (if (and ivy--directory
            (equal ivy-text ""))
       (let* ((cands (cl-loop for pair in process-environment
-                             for (var val) = (split-string pair "=" t)
-                             if (and val (not (equal "" val)))
-                             if (file-exists-p
-                                 (if (file-name-absolute-p val)
-                                     val
-                                   (setq val
-                                         (expand-file-name val 
ivy--directory))))
-                             collect (cons var val)))
+                       for (var val) = (split-string pair "=" t)
+                       if (and val (not (equal "" val)))
+                       if (file-exists-p
+                           (if (file-name-absolute-p val)
+                               val
+                             (setq val
+                                   (expand-file-name val ivy--directory))))
+                       collect (cons var val)))
              (enable-recursive-minibuffers t)
              (x (ivy-read "Env: " cands))
              (path (cdr (assoc x cands))))



reply via email to

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