emacs - 调用 nrepl-jack-in 时杀死以前的 nrepl session ？

Question

此时此刻，我主要使用 nrepl 与 Clojurescript 应用程序对话。我喜欢在 emacs 中使用 nrepl。我通过输入 M-x nrepl-jack-in 来启动 nrepl .

不幸的是，我的 nrepl session 经常完全挂起。发生这种情况时，我尽职尽责地杀死了与 nrepl 相关的 3 个缓冲区。这些缓冲区是:

*nrepl*

*nrepl-connection*

*nrepl-server*

*nrepl-server*也有一个活跃的进程，它问我要不要关闭它，我说是。

然后我输入 M-x nrepl-jack-in再次。

这是一种痛苦。

我想重载 nrepl-jack-in以便它自动检查是否存在这 3 个缓冲区中的任何一个。如果它们中的任何一个确实存在，它将终止这些缓冲区以及与这些缓冲区相关联的任何事件进程。这样做后，过载的 nrepl-jack-in将照常进行。我喜欢这个，因为这样，每当我检测到 nrepl 决定再次上吊时，我就可以输入 M-X nrepl-jack-in并重新开始我正在做的事情。

Answer 1

这应该可以完成工作:

(defun my-nrepl-jack-in ()
  (interactive)
  (dolist (buffer (buffer-list))
    (when (string-prefix-p "*nrepl" (buffer-name buffer))
      (kill-buffer buffer)))
  (nrepl-jack-in nil))