From 9ae44133ca5442d6df83830f4f6c238a67cfa6f5 Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Mon, 26 Oct 2015 08:56:10 +0100 Subject: [PATCH] Fix overlays at end-of-line with visual-line-mode * avy.el (avy--overlay-at-full): Update. Fixes #112 --- avy.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/avy.el b/avy.el index 47f3ed2..22a6873 100644 --- 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)