From: ueno <ueno>
Date: Tue, 7 Dec 2004 09:51:23 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: riece-1_0_7~114
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6479fe73a1253ca586d797a5296f5bdc0f0c8d71;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a57c56d..8ec7cde 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,6 @@
 2004-12-07  Daiki Ueno  <ueno@unixuser.org>
 
-	* riece-log.el (riece-log-insert-log): Renamed from
+	* riece-log.el (riece-log-insert): Renamed from
 	riece-log-flashback-1; simplified.
 
 2004-12-07  TAKAHASHI Kaoru  <kaoru@kaisei.org>
diff --git a/lisp/riece-log.el b/lisp/riece-log.el
index adc766f..738b2a5 100644
--- a/lisp/riece-log.el
+++ b/lisp/riece-log.el
@@ -166,7 +166,7 @@ If integer, flash back only this line numbers. t means all lines."
 				  riece-log-file-name-coding-system)))
   file-name)
 
-(defun riece-log-insert-log (identity lines)
+(defun riece-log-insert (identity lines)
   "Insert logs for IDENTITY at most LINES.
 If LINES is t, insert today's logs entirely."
   (if (eq lines t)
@@ -202,7 +202,7 @@ If LINES is t, insert today's logs entirely."
     (let (buffer-read-only
 	  (point (goto-char (point-max))))
       (insert (with-temp-buffer
-		(riece-log-insert-log identity riece-log-flashback)
+		(riece-log-insert identity riece-log-flashback)
 		(buffer-string)))
       (goto-char point)
       (while (re-search-forward