Close all buffers in Emacs but preserve neotree open

Question

I'm using the Emacs Neotree plugin that provides a filebrowser sidebar for Emacs, and I have this function to close all buffers but the current one:

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

It works ok, but it closes the neotree navigation too and I want it to remain open. Any idea on how I can get this done?

Answer 1

由于neo-buffer-name在neotreel.el中定义为*NeoTree* ，因此以下更改应可解决问题：

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