Note that change to store full avy path is for external packages

This commit is contained in:
Bob Weiner 2017-12-09 22:36:49 -05:00 committed by Oleh Krehel
parent 9489ca9064
commit d4aa876154

4
avy.el
View File

@ -470,8 +470,8 @@ multiple DISPLAY-FN invocations."
(funcall cleanup-fn) (funcall cleanup-fn)
(if (setq window (avy-mouse-event-window char)) (if (setq window (avy-mouse-event-window char))
(throw 'done (cons char window)) (throw 'done (cons char window))
;; Ensure avy-current-path stores the full path given before ;; Ensure avy-current-path stores the full path prior to
;; exit for testing when an invalid path character is given. ;; exit so other packages can utilize its value.
(setq avy-current-path (setq avy-current-path
(concat avy-current-path (string (avy--key-to-char char)))) (concat avy-current-path (string (avy--key-to-char char))))
(if (setq branch (assoc char tree)) (if (setq branch (assoc char tree))