emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

On :killall, delete windows on *scratch*

Browse source
This commit is contained in:
Henrik Lissner 2016-05-02 15:59:30 -04:00
parent cef05fe1f8
commit 7dbaf6c570
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
core/defuns/defuns-buffers.el
View file

@ -221,8 +221,9 @@ left, create a scratch buffer."
"Kill all project buffers. If BANG, kill *all* buffers (in workgroup)." "Kill all project buffers. If BANG, kill *all* buffers (in workgroup)."
(interactive "<!>") (interactive "<!>")
(narf--kill-buffers (narf/get-buffers (not bang))) (narf--kill-buffers (narf/get-buffers (not bang)))
(when bang (mapc (lambda (w) (when (eq (window-buffer w) (get-buffer "*scratch*"))
(delete-other-windows))) (delete-window w)))
(narf/get-visible-windows)))
;;;###autoload (autoload 'narf:kill-other-buffers "defuns-buffers" nil t) ;;;###autoload (autoload 'narf:kill-other-buffers "defuns-buffers" nil t)
(evil-define-command narf:kill-other-buffers (&optional bang) (evil-define-command narf:kill-other-buffers (&optional bang)