emacs/vc: minor refactor

Follow up to #2634
This commit is contained in:
Henrik Lissner 2020-03-01 01:37:41 -05:00
parent aa1f11af4f
commit 9c07cc719d
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -3,6 +3,7 @@
(when IS-WINDOWS (when IS-WINDOWS
(setenv "GIT_ASKPASS" "git-gui--askpass")) (setenv "GIT_ASKPASS" "git-gui--askpass"))
(after! log-view (after! log-view
(set-evil-initial-state! (set-evil-initial-state!
'(log-view-mode '(log-view-mode
@ -11,23 +12,24 @@
vc-bzr-log-view-mode vc-bzr-log-view-mode
vc-svn-log-view-mode) vc-svn-log-view-mode)
'emacs) 'emacs)
(evil-define-key* '(emacs) log-view-mode-map (kbd doom-leader-key) 'doom/leader) (map! :map log-view-mode-map
(map! :mode log-view-mode
"j" #'log-view-msg-next "j" #'log-view-msg-next
"k" #'log-view-msg-prev)) "k" #'log-view-msg-prev))
(after! vc-annotate (after! vc-annotate
(set-popup-rules! (set-popup-rules!
'(("^\\*vc-diff" :select nil) ; *vc-diff* '(("^\\*vc-diff" :select nil) ; *vc-diff*
("^\\*vc-change" :select t))) ; *vc-change-log* ("^\\*vc-change" :select t))) ; *vc-change-log*
(set-evil-initial-state! (set-evil-initial-state! 'vc-annotate-mode 'normal)
'(vc-annotate-mode)
'normal)
;; Clean up after itself ;; Clean up after itself
(define-key vc-annotate-mode-map [remap quit-window] #'kill-current-buffer)) (define-key vc-annotate-mode-map [remap quit-window] #'kill-current-buffer))
(after! vc-dir (set-evil-initial-state! '(vc-dir-mode) 'emacs))
(after! vc-dir
(set-evil-initial-state! 'vc-dir-mode 'emacs))
(after! git-timemachine (after! git-timemachine
;; Sometimes I forget `git-timemachine' is enabled in a buffer, so instead of ;; Sometimes I forget `git-timemachine' is enabled in a buffer, so instead of