branch: master
commit 4af1993290c46ffafd3a2e0f9ccf95a103d4db41
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
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)