Fix overlays at end-of-line with visual-line-mode

* avy.el (avy--overlay-at-full): Update.

Fixes #112

diff --git a/avy.el b/avy.el
index 47f3ed2506e6c13b4517c83de0e5357c1094070c..22a687324d3e4578bede17544c50b804346f27c8 100644 (file)
--- a/avy.el
+++ b/avy.el
@@ -759,7 +759,10 @@ LEAF is normally ((BEG . END) . WND)."
           (when (and (bound-and-true-p visual-line-mode)
                      (> len (- end beg)))
             (setq len (- end beg))
-            (setq str (substring str 0 len))))))
+            (setq str
+                  (substring (propertize
+                              (apply #'string (reverse path))
+                              'face 'avy-lead-face) 0 len))))))
     (avy--overlay
      str beg end wnd
      (lambda (str old-str)