(run-hooks 'riece-update-buffer-functions))
(setq buffers (cdr buffers)))
(run-hooks 'riece-update-indicator-functions)
- (force-mode-line-update t))
+ (force-mode-line-update t)
+ (run-hooks 'riece-update-buffer-hook))
(defun riece-channel-buffer-name (identity)
(let ((channels (riece-identity-member identity riece-current-channels)))