jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[Fix #798] Prompt for confirmation in prelude-kill-other-buffers

Browse source
This commit is contained in:
Bozhidar Batsov 2015-02-13 09:53:07 +02:00
parent 2a386116f1
commit dc861b7c8b
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
core/prelude-core.el
View file

@ -357,11 +357,12 @@ Repeated invocations toggle between the two most recently open buffers."
"Kill all buffers but the current one. "Kill all buffers but the current one.
Doesn't mess with special buffers." Doesn't mess with special buffers."
(interactive) (interactive)
(-each (when (y-or-n-p "Are you sure you want to kill all buffers but the current one? ")
(->> (buffer-list) (-each
(-filter #'buffer-file-name) (->> (buffer-list)
(--remove (eql (current-buffer) it))) (-filter #'buffer-file-name)
#'kill-buffer)) (--remove (eql (current-buffer) it)))
#'kill-buffer)))
(defun prelude-create-scratch-buffer () (defun prelude-create-scratch-buffer ()
"Create a new scratch buffer." "Create a new scratch buffer."