From ac162279f2194f9b7c4ec06afa6a7a68b9177149 Mon Sep 17 00:00:00 2001 From: Akira Tamamori Date: Fri, 4 Sep 2015 10:38:10 +0900 Subject: [PATCH] Add padding for wide-width character Add padding for wide-width character (ex. Japanese and Chinese). --- avy.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/avy.el b/avy.el index 5d1838f..fb162f3 100644 --- a/avy.el +++ b/avy.el @@ -649,7 +649,10 @@ LEAF is normally ((BEG . END) . WND)." (overlay-put ol 'window wnd) (overlay-put ol 'display (if (string= old-str "\n") (concat str "\n") - str)) + ;; add padding for wide-width character + (if (eq (string-width old-str) 2) + (concat str " ") + str))) (push ol avy--overlays-lead))) (defun avy--overlay-at-full (path leaf) @@ -727,7 +730,10 @@ LEAF is normally ((BEG . END) . WND)." ((string= old-str "\t") (concat str (make-string (- tab-width len) ?\ ))) (t - str))) + ;; add padding for wide-width character + (if (eq (string-width old-str) 2) + (concat str " ") + str)))) (push ol avy--overlays-lead)))))) (defun avy--overlay-post (path leaf)