Function: nrepl--maybe-kill-server-buffer

nrepl--maybe-kill-server-buffer is a byte-compiled function defined in nrepl-client.el.

Signature

(nrepl--maybe-kill-server-buffer SERVER-BUF)

Documentation

Kill SERVER-BUF and its process.

Do not kill the server if there is a REPL connected to that server.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260414.1619/nrepl-client.el
(defun nrepl--maybe-kill-server-buffer (server-buf)
  "Kill SERVER-BUF and its process.
Do not kill the server if there is a REPL connected to that server."
  (when (buffer-live-p server-buf)
    (with-current-buffer server-buf
      ;; Don't kill if there is at least one REPL connected to it.
      (unless (seq-find (lambda (b)
                          (eq (buffer-local-value 'nrepl-server-buffer b)
                              server-buf))
                        (buffer-list))
        (nrepl-kill-server-buffer server-buf)))))