關閉Emacs中的所有緩沖區，但保持Neotree打開

Question

我正在使用Emacs Neotree插件，該插件為Emacs提供文件瀏覽器側邊欄，並且我具有此功能來關閉除當前緩沖區外的所有緩沖區：

(defun kill-other-buffers ()
  "Close all other buffers."
  (interactive)
  (mapc 'kill-buffer (delq (current-buffer) (buffer-list))))

它可以正常工作，但是它也關閉了新樹導航，我希望它保持打開狀態。 關於如何完成此工作的任何想法嗎？

Answer 1

由於neo-buffer-name在neotreel.el中定義為*NeoTree* ，因此以下更改應可解決問題：

(mapc 'kill-buffer (delq neo-buffer-name (delq (current-buffer) (buffer-list))))