Fix spacemacs/kill-other-buffers

This commit is contained in:
Eivind Fonn 2015-11-03 13:53:10 +01:00
parent b7fff9e903
commit 0567f5cdac

View file

@ -320,10 +320,9 @@ argument takes the kindows rotate backwards."
(defun spacemacs/kill-other-buffers () (defun spacemacs/kill-other-buffers ()
"Kill all other buffers." "Kill all other buffers."
(interactive) (interactive)
(let (name (buffer-name)) (when (yes-or-no-p (format "Killing all buffers except \"%s\"? " (buffer-name)))
(when (yes-or-no-p (format "Killing all buffers except \"%s\" ? " buffer-file-name))
(mapc 'kill-buffer (delq (current-buffer) (buffer-list))) (mapc 'kill-buffer (delq (current-buffer) (buffer-list)))
(message "Buffers deleted!")))) (message "Buffers deleted!")))
;; from http://dfan.org/blog/2009/02/19/emacs-dedicated-windows/ ;; from http://dfan.org/blog/2009/02/19/emacs-dedicated-windows/
(defun spacemacs/toggle-current-window-dedication () (defun spacemacs/toggle-current-window-dedication ()