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

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

[elpa] master 4af1993 053/110: avy.el (avy-read): Update avy-current-pat


From: Oleh Krehel
Subject: [elpa] master 4af1993 053/110: avy.el (avy-read): Update avy-current-path before returning
Date: Sat, 11 May 2019 10:15:42 -0400 (EDT)

branch: master
commit 4af1993290c46ffafd3a2e0f9ccf95a103d4db41
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    avy.el (avy-read): Update avy-current-path before returning
    
    Re #226
---
 avy.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/avy.el b/avy.el
index dcd7bbf..8c3f6b2 100644
--- a/avy.el
+++ b/avy.el
@@ -468,10 +468,11 @@ multiple DISPLAY-FN invocations."
             branch)
         (funcall cleanup-fn)
         (if (setq branch (assoc char tree))
-            (if (eq (car (setq tree (cdr branch))) 'leaf)
-                (throw 'done (cdr tree))
+            (progn
               (setq avy-current-path
-                    (concat avy-current-path (string (avy--key-to-char 
char)))))
+                    (concat avy-current-path (string (avy--key-to-char char))))
+              (when (eq (car (setq tree (cdr branch))) 'leaf)
+                (throw 'done (cdr tree))))
           (funcall avy-handler-function char))))))
 
 (defun avy-read-de-bruijn (lst keys)



reply via email to

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