contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[ibuffer] migrate ibuffer to use-package

This commit is contained in:
contrapunctus 2021-07-25 20:54:40 +05:30
parent 2f3992fdc1
commit 0e1897c6f7
1 changed files with 12 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
init.org
View File

@ -1992,25 +1992,18 @@ Don't try to check if there are files with a certain extension...it will lead to
(interactive)
(kill-buffer nil))
(autoload 'ibuffer "ibuffer" "ibuffer" t)
(global-set-key (kbd "C-x C-b") 'ibuffer)
(with-eval-after-load 'ibuffer
(cp-set-keys
:unset t
:keymap ibuffer-mode-map
:bindings
`((,(kbd "m"))
(,(kbd "U"))))
(cp-set-keys
:keymap ibuffer-mode-map
:bindings
`((,(kbd "m f") ibuffer-mark-by-file-name-regexp)
(,(kbd "m m") ibuffer-mark-by-mode-regexp)
(,(kbd "m n") ibuffer-mark-by-name-regexp)
(,(kbd "M") ibuffer-mark-forward)
(,(kbd "r") ibuffer-do-replace-regexp)
(,(kbd "U") ibuffer-unmark-all)))
(add-hook 'ibuffer-mode-hook 'ibuffer-set-filter-groups-by-mode))
(use-package ibuffer
:bind (("C-x C-b" . ibuffer)
:map ibuffer-mode-map
("m" . nil)
("U" . nil)
("m f" . ibuffer-mark-by-file-name-regexp)
("m m" . ibuffer-mark-by-mode-regexp)
("m n" . ibuffer-mark-by-name-regexp)
("M" . ibuffer-mark-forward)
("r" . ibuffer-do-replace-regexp)
("U" . ibuffer-unmark-all))
:hook (ibuffer-mode . ibuffer-set-filter-groups-by-mode))
;; (require 'win-switch)
;; (global-set-key "\C-xo" 'win-switch-dispatch)