From 4132dd647e3e34456d245f8b11462ef20a557631 Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Thu, 3 Dec 2015 10:20:23 +0100 Subject: [PATCH] avy.el (avy-goto-line-above): Work in a single window * avy.el (avy-goto-line-above): (avy-goto-line-below): Bind `avy-all-windows' to nil. Re #106 --- avy.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/avy.el b/avy.el index 2d4b5a0..b4043c5 100644 --- a/avy.el +++ b/avy.el @@ -1066,7 +1066,8 @@ Otherwise, forward to `goto-line' with ARG." (defun avy-goto-line-above () "Goto visible line above the cursor." (interactive) - (let ((r (avy--line nil (window-start) (point)))) + (let* ((avy-all-windows nil) + (r (avy--line nil (window-start) (point)))) (unless (eq r t) (avy-action-goto r)))) @@ -1074,9 +1075,10 @@ Otherwise, forward to `goto-line' with ARG." (defun avy-goto-line-below () "Goto visible line below the cursor." (interactive) - (let ((r (avy--line - nil (point) - (window-end (selected-window) t)))) + (let* ((avy-all-windows nil) + (r (avy--line + nil (point) + (window-end (selected-window) t)))) (unless (eq r t) (avy-action-goto r))))