-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathmk_ibuffer-setup.el
38 lines (25 loc) · 998 Bytes
/
mk_ibuffer-setup.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
;;; mk_ibuffer-setup.el --- Custom config ibuffer
;;; Commentary:
;;
;;; Code:
(require 'ibuffer)
(require 'ibuf-ext)
(dolist (ibfilter '("^\\*" "_region_" "magit-process:.*" "magit-diff.*" "magit:.*"))
(add-to-list 'ibuffer-never-show-predicates ibfilter))
(add-hook 'ibuffer-hook
(lambda ()
(ibuffer-auto-mode 1) ;auto-update
))
;; ibuffer-show-empty-filter-groups nil ;; don't show empty filter groups
;; ibuffer-expert t ;; don't ask for confirmation of "dangerous" operations.
;; ibuffer-filter-group-name-face 'font-lock-variable-name-face ;;
;; ibuffer-old-time 50)
;; ;; Use human readable size column instead of original one
;; (define-ibuffer-column size-h
;; (:name "Size" :inline t)
;; (cond
;; ((> (buffer-size) 1000) (format "%7.3fk" (/ (buffer-size) 1000.0)))
;; ((> (buffer-size) 1000000) (format "%7.3fM" (/ (buffer-size) 1000000.0)))
;; (t (format "%8d" (buffer-size)))))
(provide 'mk_ibuffer-setup)
;;; mk_ibuffer-setup.el ends here