diff options
| author | Thomas Voss <thomas.voss@humanwave.nl> | 2025-06-11 14:59:58 +0200 |
|---|---|---|
| committer | Thomas Voss <thomas.voss@humanwave.nl> | 2025-06-11 14:59:58 +0200 |
| commit | 03f5bb39561fad4d7745ff796b91f73933d99259 (patch) | |
| tree | c02bf7e1b0657c555412c895f4efebdad777dde2 /.config/emacs/modules/mm-buffer-menu.el | |
| parent | fad74e4384176f8cf98c86cfbf5c0468c0f49dce (diff) | |
| parent | eb28738864a4b3dfe4443e897ccdea21c0765dc0 (diff) | |
Merge branch 'master' of github.com:Mango0x45/dotfiles
Diffstat (limited to '.config/emacs/modules/mm-buffer-menu.el')
| -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 |