Commit fd49a218 authored by David Cadé's avatar David Cadé Committed by Stefan Monnier
Browse files

* lisp/mpc.el (mpc-format): Use truncate-string-to-width.

Fixes: debbugs:13143
parent 4a9a8f13
2012-12-12 David Cadé <codename68@gmail.com>
* mpc.el (mpc-format): Use truncate-string-to-width (bug#13143).
2012-12-12 Jonas Bernoulli <jonas@bernoul.li>
* lisp/emacs-lisp/eieio.el: Prettier object pretty-printing (bug#13115).
......
......@@ -1034,11 +1034,8 @@ If PLAYLIST is t or nil or missing, use the main playlist."
(let ((display
(if (and size
(> (+ postwidth textwidth) size))
;; This doesn't even obey double-width chars :-(
(propertize
(if (zerop (- size postwidth 1))
(substring text 0 1)
(concat (substring text 0 (- size postwidth textwidth 1)) ""))
(truncate-string-to-width text size nil nil "")
'help-echo text)
text)))
(when (memq tag '(Artist Album Composer)) ;FIXME: wrong list.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment