* riece-display.el (riece-update-user-list-buffer): Rename from

riece-user-list-update-buffer.
(riece-update-channel-list-buffer): Rename from
riece-channel-list-update-buffer.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 50288a4..b7cde81 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2003-06-03  Daiki Ueno  <ueno@unixuser.org>
+
+       * riece-display.el (riece-update-user-list-buffer): Rename from
+       riece-user-list-update-buffer.
+       (riece-update-channel-list-buffer): Rename from
+       riece-channel-list-update-buffer.
+

 2003-06-03  Daiki Ueno  <ueno@unixuser.org>
 
        * riece-identity.el (riece-identity-canonicalize-prefix): Moved
 2003-06-03  Daiki Ueno  <ueno@unixuser.org>
 
        * riece-identity.el (riece-identity-canonicalize-prefix): Moved

diff --git a/lisp/riece-display.el b/lisp/riece-display.el
index 021ab0a..be46a46 100644 (file)
--- a/lisp/riece-display.el
+++ b/lisp/riece-display.el
@@ -29,8 +29,8 @@
 (require 'riece-misc)
 
 (defvar riece-update-buffer-functions
 (require 'riece-misc)
 
 (defvar riece-update-buffer-functions

-  '(riece-user-list-update-buffer
-    riece-channel-list-update-buffer
+  '(riece-update-user-list-buffer
+    riece-update-channel-list-buffer

     riece-update-status-indicators
     riece-update-channel-indicator
     riece-update-channel-list-indicator))
     riece-update-status-indicators
     riece-update-channel-indicator
     riece-update-channel-list-indicator))


@@ -109,7 +109,7 @@
          (set-window-start (get-buffer-window riece-channel-list-buffer)
                            (point-min))))))
 
          (set-window-start (get-buffer-window riece-channel-list-buffer)
                            (point-min))))))
 

-(defun riece-user-list-update-buffer ()
+(defun riece-update-user-list-buffer ()

   (if (and riece-user-list-buffer
           (get-buffer riece-user-list-buffer))
       (save-excursion
   (if (and riece-user-list-buffer
           (get-buffer riece-user-list-buffer))
       (save-excursion


@@ -130,7 +130,7 @@
                  (insert " " (car users) "\n")))
              (setq users (cdr users))))))))
 
                  (insert " " (car users) "\n")))
              (setq users (cdr users))))))))
 

-(defun riece-channel-list-update-buffer ()
+(defun riece-update-channel-list-buffer ()

   (if (and riece-channel-list-buffer
           (get-buffer riece-channel-list-buffer))
       (save-excursion
   (if (and riece-channel-list-buffer
           (get-buffer riece-channel-list-buffer))
       (save-excursion