From: ueno <ueno>
Date: Fri, 27 Feb 2004 09:30:48 +0000 (+0000)
Subject: (riece-display-connect-signals): Add more signals.
X-Git-Tag: signal-slot-mergepoint~16
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4b1b079b01a83aa7323be25b4ada9002c97db1b3;p=elisp%2Friece.git

(riece-display-connect-signals): Add more signals.
---

diff --git a/lisp/riece-display.el b/lisp/riece-display.el
index 6b15a21..26a7996 100644
--- a/lisp/riece-display.el
+++ b/lisp/riece-display.el
@@ -235,7 +235,12 @@ are the data of the signal."
        (run-hooks 'riece-update-buffer-functions)))
    (lambda (signal)
      (riece-identity-equal (car (riece-signal-args signal))
-			   riece-current-channel))))
+			   riece-current-channel)))
+  (riece-connect-signal
+   'riece-buffer-toggle-freeze
+   (lambda (signal handback)
+     (riece-update-status-indicators)
+     (force-mode-line-update t))))
 
 (defun riece-update-user-list-buffer ()
   (save-excursion