]> code.delx.au - gnu-emacs-elpa/commitdiff
avy.el (avy--overlay-at): Use `avy--overlay-offset'
authorOleh Krehel <ohwoeowho@gmail.com>
Wed, 13 May 2015 21:31:34 +0000 (23:31 +0200)
committerOleh Krehel <ohwoeowho@gmail.com>
Wed, 13 May 2015 21:31:34 +0000 (23:31 +0200)
Fixes abo-abo/lispy#70

avy.el

diff --git a/avy.el b/avy.el
index f676b77f879d30686d92a9d0744cf05d680e4eac..192f58b96fa32a89d4b10e44990a0f7644842998 100644 (file)
--- 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)))