This commit is contained in:
Henrik Lissner 2015-07-04 13:39:20 +02:00
parent 7fbff78544
commit 7205e5a9b8
4 changed files with 5 additions and 9 deletions

View file

@ -78,7 +78,7 @@ Inspired from http://demonastery.org/2013/04/emacs-evil-narrow-region/"
"Kill all buried, unreal buffers in current frame. See `narf-unreal-buffers'"
(interactive)
(let* ((real-buffers (narf/get-real-buffers))
(kill-list (--filter (not (memq it real-buffers)) narf/get-buried-buffers)))
(kill-list (--filter (not (memq it real-buffers)) (narf/get-buried-buffers))))
(message "Cleaned up %s buffers" (length kill-list))
(mapc 'kill-buffer kill-list)
(narf:kill-process-buffers)))