ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-13 21:33:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

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

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

Fixes #112
This commit is contained in:
Oleh Krehel 2015-10-26 08:56:10 +01:00
parent dddce37cdd
commit 9ae44133ca
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
avy.el
View File

@ -759,7 +759,10 @@ LEAF is normally ((BEG . END) . WND)."
(when (and (bound-and-true-p visual-line-mode) (when (and (bound-and-true-p visual-line-mode)
(> len (- end beg))) (> len (- end beg)))
(setq 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 (avy--overlay
str beg end wnd str beg end wnd
(lambda (str old-str) (lambda (str old-str)