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

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

[elpa] master b0512fc 21/36: avy.el (avy--overlay-at): Use `avy--overlay


From: Oleh Krehel
Subject: [elpa] master b0512fc 21/36: avy.el (avy--overlay-at): Use `avy--overlay-offset'
Date: Tue, 19 May 2015 12:38:14 +0000

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

    avy.el (avy--overlay-at): Use `avy--overlay-offset'
    
    Fixes abo-abo/lispy#70
---
 avy.el |    7 ++++---
 1 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/avy.el b/avy.el
index f676b77..192f58b 100644
--- a/avy.el
+++ b/avy.el
@@ -405,9 +405,10 @@ LEAF is normally ((BEG . END) . WND)."
   (let ((str (propertize
               (string (car (last path)))
               'face 'avy-lead-face))
-        (pt (if (consp (car leaf))
-                (caar leaf)
-              (car leaf)))
+        (pt (+ (if (consp (car leaf))
+                   (caar leaf)
+                 (car leaf))
+               avy--overlay-offset))
         (wnd (cdr leaf)))
     (let ((ol (make-overlay pt (1+ pt)
                             (window-buffer wnd)))



reply via email to

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