rename old emacs folder
[dotfiles.git] / emacs.d_old / config / init-evil.el
1
2 ;;---------------------------------------------------------------------------------------
3 ;; evil
4 ;;
5
6 (require 'evil)
7
8 (defalias 'evil-insert-state 'evil-emacs-state)
9
10 ;;https://github.com/toumorokoshi/yt.rc/blob/master/emacs/my-evil.el
11 (define-key evil-visual-state-map "\C-w" nil)
12 ;(define-key evil-normal-state-map (kbd "M-.") nil)
13 (define-key evil-normal-state-map "\C-t" nil)
14 (define-key evil-normal-state-map "\C-p" nil)
15 (define-key evil-normal-state-map "\C-n" nil)
16 (define-key evil-normal-state-map "\C-k" nil)
17 (define-key evil-normal-state-map "\C-l" nil)
18 (define-key evil-normal-state-map "\C-k" nil)
19 (define-key evil-normal-state-map "\C-j" nil)
20 (define-key evil-normal-state-map "\C-o" nil)
21
22
23 ;; M-e not works correctly in evil-normal mode, this fix it
24 (define-key evil-normal-state-map "\M-e" (lambda() (interactive)
25                                            (forward-sentence 2)))
26 (define-key evil-motion-state-map "\C-e" (move-end-of-line 1))
27
28
29 ;; most common keys in normal-mode to swith buffer, project, windows,
30 ;; in emacs mode, Esc + s + x, the same
31 (global-evil-leader-mode)
32 (evil-leader/set-leader "s")
33 (evil-leader/set-key "j" 'pl-switch-buffers)
34 (evil-leader/set-key "h" 'persp-switch)
35 (evil-leader/set-key "k" 'helm-cmd-t)
36 (evil-leader/set-key "b" 'helm-mini)
37 (evil-leader/set-key "m" 'helm-mini)
38
39
40 (setq key-chord-two-keys-delay 0.5)
41 (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
42 (key-chord-define evil-emacs-state-map "jj" 'evil-normal-state)
43
44 (key-chord-define evil-normal-state-map ";s" 'split-window-below)
45 (key-chord-define evil-normal-state-map ";v" 'split-window-right)
46
47 (key-chord-mode 1)
48
49 (define-key evil-normal-state-map [escape] 'keyboard-quit)
50 (define-key evil-visual-state-map [escape] 'keyboard-quit)
51
52 (setq evil-emacs-state-cursor '("red" box))
53 (setq evil-normal-state-cursor '("green" box))
54 (setq evil-visual-state-cursor '("orange" box))
55 (setq evil-insert-state-cursor '("red" bar))
56 (setq evil-replace-state-cursor '("red" bar))
57 (setq evil-operator-state-cursor '("red" hollow))
58 (loop for (mode . state) in '(
59                   (nrepl-mode . insert)
60                   (pylookup-mode . emacs)
61                   (comint-mode . normal)
62                   (shell-mode . emacs)
63                   (git-commit-mode . emacs)
64                   (git-rebase-mode . emacs)
65                   (term-mode . emacs)
66                   (help-mode . emacs)
67                   (helm-grep-mode . emacs)
68                   (grep-mode . emacs)
69                   (bc-menu-mode . emacs)
70                   (magit-branch-manager-mode . emacs)
71                   (magit-popup-mode . emacs)
72                   (rdictcc-buffer-mode . emacs)
73                   (dired-mode . emacs)
74                   (text-mode . emacs)
75                   (wdired-mode . normal)
76 ;                           (inferior-emacs-lisp-mode . emacs)
77 ;                           (wdired-mode . normal)
78                             (eshell-mode . emacs))
79     do (evil-set-initial-state mode state))
80
81
82 ;(global-evil-tabs-mode t)
83 (evil-mode 1)
84
85 (provide 'init-evil)