Function: rcirc-kill-buffer-hook

rcirc-kill-buffer-hook is a byte-compiled function defined in rcirc.el.gz.

Signature

(rcirc-kill-buffer-hook)

Documentation

Part the channel when killing an rcirc buffer.

If rcirc-kill-channel-buffers is non-nil and the killed buffer is a server buffer, kills all of the channel buffers associated with it.

Source Code

;; Defined in /usr/src/emacs/lisp/net/rcirc.el.gz
(defun rcirc-kill-buffer-hook ()
  "Part the channel when killing an rcirc buffer.

If `rcirc-kill-channel-buffers' is non-nil and the killed buffer
is a server buffer, kills all of the channel buffers associated
with it."
  (when (eq major-mode 'rcirc-mode)
    (when (and rcirc-log-flag
               rcirc-log-directory)
      (rcirc-log-write))
    (rcirc-clean-up-buffer "Killed buffer")
    (when-let* ((process (get-buffer-process (current-buffer))))
      (delete-process process))
    (when (and rcirc-buffer-alist ;; it's a server buffer
               rcirc-kill-channel-buffers)
      (dolist (channel rcirc-buffer-alist)
        (kill-buffer (cdr channel))))))