* Makefile.am: Export variables EMACS and XEMACS.

[elisp/liece.git] / lisp / liece-channel.el

diff --git a/lisp/liece-channel.el b/lisp/liece-channel.el
index 1bfe07b..aecc8ec 100644 (file)
--- a/lisp/liece-channel.el
+++ b/lisp/liece-channel.el
@@ -511,7 +511,7 @@ If NOSW is non-nil do not switch to newly created channel."
     (when (liece-channel-unread-p chnl)
       (setq liece-channel-unread-list
            (delete chnl liece-channel-unread-list))
-      (run-hook-with-args 'liece-channel-read-hook chnl))
+      (run-hook-with-args 'liece-channel-read-functions chnl))
     (and buffer window
         (with-current-buffer buffer
           (set-window-buffer window buffer)