Add "kill buffer" action to counsel-ibuffer

2019-12-12 15:20:22 -05:00 · 2019-12-12 15:20:22 -05:00 · a5cb2b9c45
commit a5cb2b9c45
parent f65125aec2
1 changed files with 7 additions and 0 deletions
--- a/emacs/init.org
+++ b/emacs/init.org
@ -2927,6 +2927,13 @@ An alternative minibuffer completion framework:
    ("C-c p" #'counsel-yank-pop)
    ("C-s" #'swiper-isearch))

+  (defun counsel-ibuffer-kill-buffer (x)
+    (kill-buffer (cdr x)))
+
+  (ivy-set-actions
+   'counsel-ibuffer
+   '(("k" counsel-ibuffer-kill-buffer "kill buffer")))
+
  (use-package ivy-hydra
    :after counsel)