From bd7881085b84137eabe37a36eb039025efc4c4cd Mon Sep 17 00:00:00 2001
From: Ashley Duckworth
Date: Fri, 22 Jan 2021 13:01:01 -0600
Subject: Change behavior of kill-a-buffer

I don't know if I'll /ever/ want to kill all other buffers and
windows, so I've changed C-u C-u M-x kill-a-buffer to just run
kill-buffer.
---
 config.org | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/config.org b/config.org
index 55ccaf7..0b71e4c 100644
--- a/config.org
+++ b/config.org
@@ -218,7 +218,7 @@ function to the =kill-buffer-query-functions= hook that will return
   `kill-a-buffer' uses the PREFIX argument to determine which buffer(s) to kill:
   0            => Kill current buffer & window
   4 (C-u)      => Kill OTHER buffer & window
-  16 (C-u C-u) => Kill ALL OTHER buffers & windows"
+  16 (C-u C-u) => Run `kill-buffer' without a prefix arg."
     (interactive "P")
     (pcase (or (car prefix) 0)
       (0 (kill-current-buffer)
@@ -226,8 +226,8 @@ function to the =kill-buffer-query-functions= hook that will return
       (4 (other-window 1)
          (kill-current-buffer)
          (unless (one-window-p) (delete-window)))
-      (16 (mapc #'kill-buffer (delq (current-buffer) (buffer-list)))
-          (delete-other-windows))))
+      (16 (let ((current-prefix-arg nil))
+            (kill-buffer)))))
 #+end_src
 
 #+begin_src emacs-lisp :noweb-ref bindings
-- 
cgit 1.4.1-21-gabe81