Mercurial > emacs
changeset 112416:f792eb37d0ca
* net/rcirc.el (rcirc-kill-buffer-hook): Flush logs.
| author | Deniz Dogan <deniz.a.m.dogan@gmail.com> |
|---|---|
| date | Sat, 22 Jan 2011 17:21:38 +0100 |
| parents | 555faf6e40d0 |
| children | 9f7614f1a892 |
| files | lisp/net/rcirc.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/net/rcirc.el Sat Jan 22 12:34:50 2011 +0000 +++ b/lisp/net/rcirc.el Sat Jan 22 17:21:38 2011 +0100 @@ -1029,6 +1029,9 @@ (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 ()