X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-mini.el;h=da6208996e6e54e0a826bec280605ec70208f6b9;hp=f9f75873fdba948690545ad6204e7a6b5d60a736;hb=5a45c8b53ddb25f03bdab9f3491a92c064c47c7a;hpb=8619f3625453c5351c5dcbd2e9e8667a113e08ec

diff --git a/lisp/riece-mini.el b/lisp/riece-mini.el
index f9f7587..da62089 100644
--- a/lisp/riece-mini.el
+++ b/lisp/riece-mini.el
@@ -123,7 +123,7 @@ If twice (C-u C-u), then ask the channel."
     (let ((height (1+ riece-mini-backlog-size)))
       (mapc #'(lambda (string)
 		(setq height (+ height
-				(/ (length string) (window-width)))))
+				(/ (string-width string) (window-width)))))
 	    riece-mini-backlog-history)
       (let ((max-mini-window-height height)
 	    (resize-mini-windows t))