Fixed.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a57c56d..8ec7cde 100644 (file)
--- 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 (file)
--- 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