Paste
#78897: ibuffer
;;;; ibuffer
(require 'ibuffer)
(require 'ibuf-ext)
(setq-default ibuffer-saved-filter-groups
'(("default"
("erc" (mode . erc-mode))
("jabber" (or
(mode . jabber-chat-mode)
(mode . jabber-roster-mode)))
("org" (mode . org-mode))
("creole" (mode . creole-mode))
("ruby" (mode . ruby-mode))
("haskell" (mode . haskell-mode))
("erlang" (mode . erlang-mode))
("c/c++" (mode . c++-mode))
("elisp" (mode . emacs-lisp-mode))
("verilog" (mode . verilog-mode))
("dired" (mode . dired-mode)))))
(define-key ibuffer-mode-map (kbd "TAB")
'ibuffer-toggle-filter-group)
(defun ibuffer-load-default-group ()
(ibuffer-switch-to-saved-filter-groups "default"))
(add-hook 'ibuffer-mode-hook 'ibuffer-load-default-group)