Fixed typo.
authorDaiki Ueno <ueno@unixuser.org>
Sat, 27 Aug 2005 04:37:31 +0000 (04:37 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Sat, 27 Aug 2005 04:37:31 +0000 (04:37 +0000)
lisp/riece-button.el

index ba15859..b7ebbc8 100644 (file)
@@ -250,16 +250,16 @@ This function is used as a callback for a channel button."
   (save-excursion
     (when riece-channel-list-buffer
       (set-buffer riece-channel-list-buffer)
   (save-excursion
     (when riece-channel-list-buffer
       (set-buffer riece-channel-list-buffer)
-      (riece-channel-list-mode-hook))
+      (riece-button-channel-list-mode-hook))
     (when riece-user-list-buffer
       (set-buffer riece-user-list-buffer)
     (when riece-user-list-buffer
       (set-buffer riece-user-list-buffer)
-      (riece-user-list-mode-hook))
+      (riece-button-user-list-mode-hook))
     (let ((buffers riece-buffer-list))
       (while buffers
        (set-buffer (car buffers))
        (if (eq (derived-mode-class major-mode)
                'riece-dialogue-mode)
     (let ((buffers riece-buffer-list))
       (while buffers
        (set-buffer (car buffers))
        (if (eq (derived-mode-class major-mode)
                'riece-dialogue-mode)
-           (riece-dialogue-mode-hook))
+           (riece-button-dialogue-mode-hook))
        (setq buffers (cdr buffers)))))
   (add-hook 'riece-channel-list-mode-hook
            'riece-button-channel-list-mode-hook)
        (setq buffers (cdr buffers)))))
   (add-hook 'riece-channel-list-mode-hook
            'riece-button-channel-list-mode-hook)