(save-excursion
(when riece-channel-list-buffer
(set-buffer riece-channel-list-buffer)
- (riece-channel-list-mode-hook)
+ (riece-channel-list-mode-hook))
(when riece-user-list-buffer
(set-buffer riece-user-list-buffer)
- (riece-user-list-mode-hook)
+ (riece-user-list-mode-hook))
(let ((buffers riece-buffer-list))
(while buffers
(set-buffer (car buffers))
(defun riece-toolbar-uninstall ()
(if riece-command-buffer
(with-current-buffer riece-command-buffer
- (riece-unset-toolbar))
+ (riece-unset-toolbar)))
(remove-hook 'riece-command-mode-hook
'riece-toolbar-command-mode-hook))