Fix 'at-full moving text for chars near end of visual line

* avy.el (avy--overlay-at-full): Update.
This commit is contained in:
Oleh Krehel 2015-10-25 15:18:27 +01:00
parent 567570af41
commit dddce37cdd

6
avy.el
View File

@ -755,7 +755,11 @@ LEAF is normally ((BEG . END) . WND)."
(if (eq (char-after) ?\t)
1
len))
lep))))))
lep)))
(when (and (bound-and-true-p visual-line-mode)
(> len (- end beg)))
(setq len (- end beg))
(setq str (substring str 0 len))))))
(avy--overlay
str beg end wnd
(lambda (str old-str)