From 80094035aff85d827e1ef65627974b34ad9fa8df Mon Sep 17 00:00:00 2001
From: Giorgos Keramidas <keramida@ceid.upatras.gr>
Date: Sat, 22 Jan 2011 17:21:38 +0100
Subject: [PATCH] * net/rcirc.el (rcirc-kill-buffer-hook): Flush logs.

---
 lisp/net/rcirc.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 6481f627d92..cf570beb0ff 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -1029,6 +1029,9 @@ If ALL is non-nil, update prompts in all IRC buffers."
 (defun rcirc-kill-buffer-hook ()
   "Part the channel when killing an rcirc buffer."
   (when (eq major-mode 'rcirc-mode)
+    (when (and rcirc-log-flag
+               rcirc-log-directory)
+      (rcirc-log-write))
     (rcirc-clean-up-buffer "Killed buffer")))
 
 (defun rcirc-change-major-mode-hook ()
-- 
2.11.4.GIT