branch: master
commit dddce37cdd968f817de3aee3e9e311b54059e126
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
Fix 'at-full moving text for chars near end of visual line
* avy.el (avy--overlay-at-full): Update.
---
avy.el | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/avy.el b/avy.el
index 32fd3c6..47f3ed2 100644
--- a/avy.el
+++ b/avy.el
@@ -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)