X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-log.el;h=624115b46707e5510d8e47a87fd856acc9e48a91;hb=bf2df5d4bf0f70c7f102eb924e352f83d46f3fa4;hp=93a4ed915c3e05f19a6bafd0277b55ff096ce843;hpb=56b722577563032371ad6b29e3c0c86c074d7ea4;p=elisp%2Friece.git

diff --git a/lisp/riece-log.el b/lisp/riece-log.el
index 93a4ed9..624115b 100644
--- a/lisp/riece-log.el
+++ b/lisp/riece-log.el
@@ -31,6 +31,7 @@
 
 (require 'riece-message)
 (require 'riece-button)
+(require 'riece-mcat)
 
 (defgroup riece-log nil
   "Save IRC logs."
@@ -237,8 +238,9 @@ If LINES is t, insert today's logs entirely."
   (when riece-log-flashback
     (riece-insert-info (current-buffer)
 		       (if (eq riece-log-flashback t)
-			   "Recent messages of the day:\n"
-			 (format "Recent messages up to %d lines:\n"
+			   (riece-mcat "Recent messages of the day:\n")
+			 (format (riece-mcat
+				  "Recent messages up to %d lines:\n")
 				 riece-log-flashback)))
     (let (buffer-read-only
 	  (point (goto-char (point-max))))