From: Daiki Ueno <ueno@unixuser.org>
Date: Tue, 14 Dec 2004 02:15:55 +0000 (+0000)
Subject: Fixed.
X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;h=666d8fb2452dbf26f599c6bf7c739074276988bf;p=riece

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