X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-message.el;h=0ed460225a7242860c05e688c0abfff3898859fa;hp=f9d3740f9cf94a5673de1fbf835f73c6a2785d8e;hb=c63c8dbd3ecdedb1d9da78546b252b6dc1c4e46d;hpb=70f7f82c08b9bb70c14b506354db416cf569c8ca

diff --git a/lisp/riece-message.el b/lisp/riece-message.el
index f9d3740..0ed4602 100644
--- a/lisp/riece-message.el
+++ b/lisp/riece-message.el
@@ -174,7 +174,8 @@ Normally they are *Dialogue* and/or *Others*."
     (setq parent-buffers (riece-message-parent-buffers message buffer))
     (riece-insert buffer (riece-format-message message))
     (riece-insert parent-buffers (riece-format-message message t))
-    (run-hook-with-args 'riece-after-display-message-functions message)))
+    (with-current-buffer buffer
+      (run-hook-with-args 'riece-after-display-message-functions message))))
 
 (defun riece-display-message (message)
   "Display MESSAGE object."