From 894c9a5e4300455ae80e11e8e3079c57d5d557f6 Mon Sep 17 00:00:00 2001 From: ueno Date: Mon, 8 Mar 2004 06:44:50 +0000 Subject: [PATCH] * riece-xface.el (riece-xface-insinuate): Use riece-user-list-mode-hook to setup riece-update-buffer-functions in user-list buffer. --- lisp/ChangeLog | 6 ++++++ lisp/riece-xface.el | 7 +++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 676476b..c64af92 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2004-03-08 Daiki Ueno + + * riece-xface.el (riece-xface-insinuate): Use + riece-user-list-mode-hook to setup riece-update-buffer-functions + in user-list buffer. + 2004-03-07 Daiki Ueno * Riece: Version 0.2.0 released. diff --git a/lisp/riece-xface.el b/lisp/riece-xface.el index dbb8a27..29a71ad 100644 --- a/lisp/riece-xface.el +++ b/lisp/riece-xface.el @@ -59,11 +59,10 @@ '(riece-lsdb)) (defun riece-xface-insinuate () - (add-hook 'riece-startup-hook + (add-hook 'riece-user-list-mode-hook (lambda () - (with-current-buffer riece-user-list-buffer - (add-hook 'riece-update-buffer-functions - 'riece-xface-update-user-list-buffer t))))) + (add-hook 'riece-update-buffer-functions + 'riece-xface-update-user-list-buffer t t)))) (provide 'riece-xface) -- 1.7.10.4