branch: master commit 4af1993290c46ffafd3a2e0f9ccf95a103d4db41 Author: Oleh Krehel <ohwoeo...@gmail.com> Commit: Oleh Krehel <ohwoeo...@gmail.com>
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)