From: Mark Oteiza <mvoteiza@udel.edu>
Date: Sun, 11 Oct 2015 02:43:44 +0000 (-0400)
Subject: * lisp/net/eww.el (eww-bookmark-prepare): Use truncate-string-to-width.
X-Git-Tag: emacs-25.0.90~1003^2^2~22
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3f828dc76be74e3587af74b5b3e3458f67f2b7ba;p=emacs.git

* lisp/net/eww.el (eww-bookmark-prepare): Use truncate-string-to-width.

`substring' does not account for full width characters.
---

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 6a315496fe0..5748e88bbca 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1501,7 +1501,7 @@ If CHARSET is nil then use UTF-8."
       (setq start (point)
 	    title (plist-get bookmark :title))
       (when (> (length title) width)
-	(setq title (substring title 0 width)))
+	(setq title (truncate-string-to-width title width)))
       (insert (format format title (plist-get bookmark :url)) "\n")
       (put-text-property start (1+ start) 'eww-bookmark bookmark))
     (goto-char (point-min))))