From 78392e670ec12d93e0e169a7fabcd024664e5abe Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Sun, 10 Dec 2017 20:02:40 +0100 Subject: [PATCH] avy.el (avy-action-teleport): Adjust for avy-goto-line Re #191 --- avy.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/avy.el b/avy.el index 417fb6f..9eb2652 100644 --- a/avy.el +++ b/avy.el @@ -676,12 +676,19 @@ Set `avy-style' according to COMMMAND as well." (kill-region pt (point)) (just-one-space)) (message "Killed: %s" (current-kill 0)) + (select-window + (cdr + (ring-ref avy-ring 0))) t) (defun avy-action-teleport (pt) "Kill sexp starting on PT and yank into the current location." (avy-action-kill-stay pt) - (yank)) + (select-window + (cdr + (ring-ref avy-ring 0))) + (yank) + t) (declare-function flyspell-correct-word-before-point "flyspell")