* riece-display.el (riece-update-buffers): Run
[riece] / lisp / riece-display.el
index 44a1254..3101aa3 100644 (file)
@@ -178,7 +178,8 @@ Local to the buffer in `riece-buffer-list'.")
       (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)))