diff options
| author | Thomas Voss <mail@thomasvoss.com> | 2025-05-29 23:37:51 +0200 |
|---|---|---|
| committer | Thomas Voss <mail@thomasvoss.com> | 2025-05-29 23:37:51 +0200 |
| commit | a83a65fe567d92911223ed6eb4ea6411573d9f32 (patch) | |
| tree | 05a0509fb347a7aa7fdec5ae319dcbab7523bd31 /.config/emacs/modules | |
| parent | df54f5514203308432335d07fd7ca338f5846f45 (diff) | |
emacs: Add mm-buffer-menu.el
Diffstat (limited to '.config/emacs/modules')
| -rw-r--r-- | .config/emacs/modules/mm-buffer-menu.el | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/.config/emacs/modules/mm-buffer-menu.el b/.config/emacs/modules/mm-buffer-menu.el new file mode 100644 index 0000000..7b725c6 --- /dev/null +++ b/.config/emacs/modules/mm-buffer-menu.el @@ -0,0 +1,15 @@ +;;; mm-buffer-menu.el --- Buffer Menu configuration -*- lexical-binding: t; -*- + +(defun mm-Buffer-menu-delete-all () + "Mark all buffers for deletion." + (interactive nil Buffer-menu-mode) + (save-excursion + (goto-char (point-min)) + (while (not (eobp)) + (Buffer-menu-delete)))) + +(use-package buff-menu + :bind ( :map Buffer-menu-mode-map + ("D" . mm-Buffer-menu-delete-all))) + +(provide 'mm-buffer-menu)
\ No newline at end of file |