/
my-ibuffer.el
45 lines (39 loc) · 1.35 KB
/
my-ibuffer.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
;;
;;
;; ibuffer
;;
;;
(global-set-key "\C-x\C-b" 'ibuffer)
(autoload 'ibuffer "ibuffer" "List buffers." t)
;(add-to-list 'ibuffer-never-show-regexps "^\\*")
(setq ibuffer-show-empty-filter-groups nil)
(setq ibuffer-shrink-to-minimum-size t)
(setq ibuffer-always-show-last-buffer nil)
(setq ibuffer-sorting-mode 'recency)
(setq ibuffer-use-header-line t)
(setq ibuffer-saved-filter-groups
'(("home"
("emacs-config" (or (filename . ".emacs.d")
(filename . ".emacs")))
("lubpytno" (filename . "lubopytno"))
("orionet" (filename . "orionet"))
("chebit" (filename . "chebit"))
("chebytoday" (filename . "chebytoday"))
("Org" (or (mode . org-mode)
(filename . "OrgMode")))
("code" (filename . "code"))
("Web Dev" (or (mode . html-mode)
(mode . haml-mode)
(mode . sass-mode)
(mode . ruby-mode)
(mode . css-mode)))
("Subversion" (name . "\*svn"))
("Magit" (name . "\*magit"))
; ("ERC" (mode . erc-mode))
("Help" (or (name . "\*Help\*")
(name . "\*Apropos\*")
(name . "\*info\*"))))))
(add-hook 'ibuffer-mode-hook
'(lambda ()
(ibuffer-auto-mode 1)
(ibuffer-switch-to-saved-filter-groups "home")))