Set up ibuffer

author: Case Duckworth 2021-12-26 13:05:13 -0600
committer: Case Duckworth 2021-12-26 13:05:13 -0600
commit: 7b0dbb031f757f6743cc3900b507edd6b610f922 (patch)
tree: 0a7775637440e5275107e0f60617b834a724f51d
parent: Fix random issues (diff)
download: emacs-7b0dbb031f757f6743cc3900b507edd6b610f922.tar.gz
emacs-7b0dbb031f757f6743cc3900b507edd6b610f922.zip
1 files changed, 32 insertions, 0 deletions
diff --git a/init.el b/init.el
index b65cd61..7302f6b 100644
--- a/init.el
+++ b/init.el

@@ -237,6 +237,38 @@
 (setup eww
  (:hook 'reading-mode))
+(setup ibuffer
+  (:also-load ibuf-ext)
+  (:option ibuffer-expert t
+           ibuffer-show-empty-filter-groups nil
+           ibuffer-saved-filter-groups
+           '(("default"
+              ("Org" (mode . org-mode))
+              ("emacs" (or (name . "^\\*scratch\\*$")
+                           (name . "^\\*Messages\\*$")
+                           (name . "^\\*Warnings\\*$")
+                           (name . "^\\*straight-process\\*$")
+                           (name . "^\\*Calendar\\*$")))
+              ("customize" (mode . Custom-mode))
+              ("emacs-config" (or (filename . ".emacs.d")
+                                  (mode . +init-mode)))
+              ("git" (or (name . "^\*magit")
+                         (name . "^\magit")))
+              ("help" (or (mode . help-mode)
+                          (mode . Info-mode)
+                          (mode . helpful-mode)))
+              ("irc" (or (mode . erc-mode)
+                         (mode . circe-server-mode)
+                         (mode . circe-channel-mode)))
+              ("shell" (or (mode . eshell-mode)
+                           (mode . shell-mode)
+                           (mode . vterm-mode)))
+              ("web" (or (mode . elpher-mode)
+                         (mode . eww-mode))))))
+  (:hook (defun ibuffer@filter-to-default ()
+           (ibuffer-auto-mode +1)
+           (ibuffer-switch-to-saved-filter-groups "default"))))
 (setup magit
  ;; This setup is weird because of dependency issues
  (:straight (transient :host github :repo "magit/transient" :branch "master")
author	Case Duckworth	2021-12-26 13:05:13 -0600
committer	Case Duckworth	2021-12-26 13:05:13 -0600
commit	7b0dbb031f757f6743cc3900b507edd6b610f922 (patch)
tree	0a7775637440e5275107e0f60617b834a724f51d
parent	Fix random issues (diff)
download	emacs-7b0dbb031f757f6743cc3900b507edd6b610f922.tar.gz emacs-7b0dbb031f757f6743cc3900b507edd6b610f922.zip

diff --git a/init.el b/init.el index b65cd61..7302f6b 100644 --- a/init.el +++ b/init.el
@@ -237,6 +237,38 @@
237	(setup eww	237	(setup eww
238	(:hook 'reading-mode))	238	(:hook 'reading-mode))
239		239
		240	(setup ibuffer
		241	(:also-load ibuf-ext)
		242	(:option ibuffer-expert t
		243	ibuffer-show-empty-filter-groups nil
		244	ibuffer-saved-filter-groups
		245	'(("default"
		246	("Org" (mode . org-mode))
		247	("emacs" (or (name . "^\\scratch\\$")
		248	(name . "^\\Messages\\$")
		249	(name . "^\\Warnings\\$")
		250	(name . "^\\straight-process\\$")
		251	(name . "^\\Calendar\\$")))
		252	("customize" (mode . Custom-mode))
		253	("emacs-config" (or (filename . ".emacs.d")
		254	(mode . +init-mode)))
		255	("git" (or (name . "^\*magit")
		256	(name . "^\magit")))
		257	("help" (or (mode . help-mode)
		258	(mode . Info-mode)
		259	(mode . helpful-mode)))
		260	("irc" (or (mode . erc-mode)
		261	(mode . circe-server-mode)
		262	(mode . circe-channel-mode)))
		263	("shell" (or (mode . eshell-mode)
		264	(mode . shell-mode)
		265	(mode . vterm-mode)))
		266	("web" (or (mode . elpher-mode)
		267	(mode . eww-mode))))))
		268	(:hook (defun ibuffer@filter-to-default ()
		269	(ibuffer-auto-mode +1)
		270	(ibuffer-switch-to-saved-filter-groups "default"))))
		271
240	(setup magit	272	(setup magit
241	;; This setup is weird because of dependency issues	273	;; This setup is weird because of dependency issues
242	(:straight (transient :host github :repo "magit/transient" :branch "master")	274	(:straight (transient :host github :repo "magit/transient" :branch "master")