Minor fixes on ibuffer (emacs)
Signed-off-by: Collin J. Doering <rekahsoft@gmail.com>
This commit is contained in:
parent
f46277891f
commit
7fb2742958
18
.emacs
18
.emacs
|
@ -209,10 +209,18 @@
|
||||||
|
|
||||||
;; Enable ibuffer-vc extension
|
;; Enable ibuffer-vc extension
|
||||||
;; TODO: enable along side my pre existing filter groups using (ibuffer-vc-generate-filter-groups-by-vc-root).
|
;; TODO: enable along side my pre existing filter groups using (ibuffer-vc-generate-filter-groups-by-vc-root).
|
||||||
;; This cannot be done in the ibuffer-saved-filters because ibuffer-vc-generate... returns a list of cons
|
;; Also add a key binding to switch to the vc-ibuffer (note: to switch back to the default ibuffer list use / R in ibuffer-mode
|
||||||
;; cells but we need this to be dynamic (use a hook like ibuffer-load-hook)
|
|
||||||
(require 'ibuffer-vc)
|
(require 'ibuffer-vc)
|
||||||
|
|
||||||
|
;; Add vc-status line to ibuffer
|
||||||
|
(setq ibuffer-formats '((mark modified read-only vc-status-mini " "
|
||||||
|
(name 18 18 :left :elide) " "
|
||||||
|
(size 9 -1 :right) " "
|
||||||
|
(mode 16 16 :left :elide) " "
|
||||||
|
(vc-status 16 16 :left) " "
|
||||||
|
filename-and-process)
|
||||||
|
(mark " " (name 16 -1) " " filename)))
|
||||||
|
|
||||||
;; Filter ibuffers (similar to gnus)
|
;; Filter ibuffers (similar to gnus)
|
||||||
(setq ibuffer-saved-filter-groups
|
(setq ibuffer-saved-filter-groups
|
||||||
'(("default"
|
'(("default"
|
||||||
|
@ -284,7 +292,9 @@
|
||||||
(mode . magit-commit-mode)
|
(mode . magit-commit-mode)
|
||||||
(mode . magit-log-mode)
|
(mode . magit-log-mode)
|
||||||
(mode . magit-wazzup-mode)
|
(mode . magit-wazzup-mode)
|
||||||
(mode . magit-process-mode)))
|
(mode . magit-process-mode)
|
||||||
|
(mode . magit-status-mode)
|
||||||
|
(mode . magit-branch-manager-mode)))
|
||||||
("bookmarks" (or
|
("bookmarks" (or
|
||||||
(name . "^\\*Bookmark List\\*$")))
|
(name . "^\\*Bookmark List\\*$")))
|
||||||
("help" (or
|
("help" (or
|
||||||
|
@ -332,7 +342,7 @@
|
||||||
|
|
||||||
(add-hook 'ibuffer-mode-hook
|
(add-hook 'ibuffer-mode-hook
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(ibuffer-switch-to-saved-filter-groups "default")))
|
(ibuffer-switch-to-saved-filter-groups "default")))
|
||||||
|
|
||||||
;; Setup oauth2 (required by google-contacts)
|
;; Setup oauth2 (required by google-contacts)
|
||||||
(require 'oauth2-autoloads) ;; ELPA
|
(require 'oauth2-autoloads) ;; ELPA
|
||||||
|
|
Reference in New Issue