From: Fran Litterio <flitterio@gmail.com>
Date: Sun, 27 Dec 2015 07:56:45 +0000 (+0100)
Subject: Run erc-kill-channel-hook always on exit
X-Git-Tag: emacs-25.0.90~354
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6ae0aa6a504c6023dfe234b507c95f146d668436;p=emacs.git

Run erc-kill-channel-hook always on exit

* lisp/erc/erc.el (erc-kill-buffer-function): Run erc-kill-channel-hook
when erc-kill-queries-on-quit is set (bug#21187).
---

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index a66338dff02..70e37348b6a 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -6702,7 +6702,7 @@ or `erc-kill-buffer-hook' if any other buffer."
     (cond
      ((eq (erc-server-buffer) (current-buffer))
       (run-hooks 'erc-kill-server-hook))
-     ((erc-channel-p (erc-default-target))
+     ((erc-channel-p (or (erc-default-target) (buffer-name)))
       (run-hooks 'erc-kill-channel-hook))
      (t
       (run-hooks 'erc-kill-buffer-hook)))))