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

Reply via email to