emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master a45159a 64/78: avy.el (avy-goto-line-above): Exclude the c


From: Oleh Krehel
Subject: [elpa] master a45159a 64/78: avy.el (avy-goto-line-above): Exclude the current line
Date: Sat, 23 Jan 2016 14:00:20 +0000

branch: master
commit a45159a8ca9626e19ddf5e517d1eccf64c0dd69d
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    avy.el (avy-goto-line-above): Exclude the current line
    
    * avy.el (avy-goto-line-below): Exclude the current line
    
    Re #106
---
 avy.el |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/avy.el b/avy.el
index b4043c5..412d9b2 100644
--- a/avy.el
+++ b/avy.el
@@ -1067,7 +1067,8 @@ Otherwise, forward to `goto-line' with ARG."
   "Goto visible line above the cursor."
   (interactive)
   (let* ((avy-all-windows nil)
-         (r (avy--line nil (window-start) (point))))
+         (r (avy--line nil (window-start)
+                       (line-beginning-position))))
     (unless (eq r t)
       (avy-action-goto r))))
 
@@ -1077,7 +1078,7 @@ Otherwise, forward to `goto-line' with ARG."
   (interactive)
   (let* ((avy-all-windows nil)
          (r (avy--line
-             nil (point)
+             nil (line-beginning-position 2)
              (window-end (selected-window) t))))
     (unless (eq r t)
       (avy-action-goto r))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]