* riece-display.el (riece-update-buffers): Run

[riece] / lisp / riece-display.el

diff --git a/lisp/riece-display.el b/lisp/riece-display.el
index 44a1254..3101aa3 100644 (file)
--- a/lisp/riece-display.el
+++ b/lisp/riece-display.el
@@ -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)
       (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)))
 
 (defun riece-channel-buffer-name (identity)
   (let ((channels (riece-identity-member identity riece-current-channels)))