From: ueno <ueno>
Date: Tue, 14 Dec 2004 02:15:55 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: riece-1_0_7~81
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bbed606d34db40458d4bd1678fe8406f588e470e;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/riece-emacs.el b/lisp/riece-emacs.el
index 2997420..7477633 100644
--- a/lisp/riece-emacs.el
+++ b/lisp/riece-emacs.el
@@ -105,7 +105,7 @@
 
 (defun riece-normalize-modeline-string (string)
   (if (listp string)
-      (riece-normalize-modeline-string-1 string)
+      (list (apply #'concat (riece-normalize-modeline-string-1 string)))
     string))
 
 (defun riece-put-text-property-nonsticky (start end prop value