2 ;;---------------------------------------------------------------------------------------
7 (defalias 'evil-insert-state 'evil-emacs-state)
8 ;; C-o C-o switch to normal mode, defined in config/init-key-binding.el
9 ;;;(global-set-key (kbd "C-o C-o") 'evil-normal-state)
11 ;;https://github.com/toumorokoshi/yt.rc/blob/master/emacs/my-evil.el
12 ;; let's disable keymaps we don't want.
13 ;; basically, anything that uses C or M
14 (define-key evil-visual-state-map "\C-w" nil)
15 ;(define-key evil-normal-state-map (kbd "M-.") nil)
16 (define-key evil-normal-state-map "\C-t" nil)
17 (define-key evil-normal-state-map "\C-p" nil)
18 (define-key evil-normal-state-map "\C-n" nil)
19 (define-key evil-normal-state-map "\C-k" nil)
20 (define-key evil-normal-state-map "\C-l" nil)
21 (define-key evil-normal-state-map "\C-k" nil)
22 (define-key evil-normal-state-map "\C-j" nil)
23 (define-key evil-normal-state-map "\C-o" nil)
26 (global-evil-leader-mode)
27 (evil-leader/set-leader ";")
28 (evil-leader/set-key "e" 'find-file)
29 (evil-leader/set-key "b" 'switch-to-buffer)
30 (evil-leader/set-key "w" 'evil-write)
32 (evil-leader/set-key "s" 'split-window-below)
33 (evil-leader/set-key "v" 'split-window-right)
34 (evil-leader/set-key "q" 'delete-window)
36 (setq key-chord-two-keys-delay 0.5)
37 (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
38 (key-chord-define evil-emacs-state-map "jj" 'evil-normal-state)
42 (define-key evil-normal-state-map [escape] 'keyboard-quit)
43 (define-key evil-visual-state-map [escape] 'keyboard-quit)
45 ;(define-key minibuffer-local-map [jscape] 'minibuffer-keyboard-quit)
46 ;(define-key minibuffer-local-ns-map [escape] 'minibuffer-keyboard-quit)
47 ;(define-key minibuffer-local-completion-map [escape] 'minibuffer-keyboard-quit)
48 ;(define-key minibuffer-local-must-match-map [escape] 'minibuffer-keyboard-quit)
49 ;(define-key minibuffer-local-isearch-map [escape] 'minibuffer-keyboard-quit)
53 ;(setq evil-emacs-state-cursor '("red" box))
54 (setq evil-emacs-state-cursor '("red" bar))
55 (setq evil-normal-state-cursor '("green" box))
56 (setq evil-visual-state-cursor '("orange" box))
57 (setq evil-insert-state-cursor '("red" bar))
58 (setq evil-replace-state-cursor '("red" bar))
59 (setq evil-operator-state-cursor '("red" hollow))
60 ;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil
61 (loop for (mode . state) in '(
63 (pylookup-mode . emacs)
64 (comint-mode . normal)
66 (git-commit-mode . insert)
67 (git-rebase-mode . emacs)
70 (helm-grep-mode . emacs)
72 (bc-menu-mode . emacs)
73 (magit-branch-manager-mode . emacs)
74 (rdictcc-buffer-mode . emacs)
76 (wdired-mode . normal)
77 ; (inferior-emacs-lisp-mode . emacs)
78 ; (wdired-mode . normal)
79 (eshell-mode . emacs))
80 do (evil-set-initial-state mode state))
83 ;(global-evil-tabs-mode t)