From: Fran Litterio <flitterio@gmail.com>
Date: Tue, 18 Apr 2017 00:30:40 +0000 (-0400)
Subject: Small erc-kill-channel fix (bug#23700)
X-Git-Tag: emacs-26.0.90~521^2~604
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4ad6be65f68a5c875ecbaa9e66d8ced28f43670a;p=emacs.git

Small erc-kill-channel fix (bug#23700)

* lisp/erc/erc.el (erc-kill-channel): Handle null erc-default-target.
---

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 488404d7341..7e19ebbf980 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -6735,9 +6735,10 @@ This function should be on `erc-kill-server-hook'."
 This function should be on `erc-kill-channel-hook'."
   (when (erc-server-process-alive)
     (let ((tgt (erc-default-target)))
-      (erc-server-send (format "PART %s :%s" tgt
-                               (funcall erc-part-reason nil))
-                       nil tgt))))
+      (if tgt
+         (erc-server-send (format "PART %s :%s" tgt
+                                  (funcall erc-part-reason nil))
+                          nil tgt)))))
 
 ;;; Dealing with `erc-parsed'