emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master dddce37 55/78: Fix 'at-full moving text for chars near end


From: Oleh Krehel
Subject: [elpa] master dddce37 55/78: Fix 'at-full moving text for chars near end of visual line
Date: Sat, 23 Jan 2016 14:00:13 +0000

branch: master
commit dddce37cdd968f817de3aee3e9e311b54059e126
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]