avy.el (avy-action-goto): Remove lag

1 files changed, 3 insertions, 2 deletions

diff --git a/avy.el b/avy.el
index 2613efc..7dbbb34 100644
--- a/avy.el
+++ b/avy.el
@@ -628,8 +628,9 @@ Set `avy-style' according to COMMMAND as well."
 (defun avy-action-goto (pt)
   "Goto PT."
   (let ((frame (window-frame (selected-window))))
-    (select-frame-set-input-focus frame)
-    (raise-frame frame)
+    (unless (equal frame (selected-frame))
+      (select-frame-set-input-focus frame)
+      (raise-frame frame))
     (goto-char pt)))
 
 (defun avy-forward-item ()