emacs.d/config/init-evil.el

   1
   2 ;;---------------------------------------------------------------------------------------
   3 ;; evil
   4 ;;
   5 (global-evil-leader-mode)
   6 (evil-leader/set-leader ";")
   7 (evil-leader/set-key "e" 'find-file)
   8 (evil-leader/set-key "b" 'switch-to-buffer)
   9 (evil-leader/set-key "w" 'evil-write)
  10
  11 ;; TODO: change cursor to next windows
  12 (evil-leader/set-key "s" 'split-window-below)
  13 (evil-leader/set-key "v" 'split-window-right)
  14 (evil-leader/set-key "q" 'delete-window)
  15
  16 (require 'evil)
  17 ;(setq key-chord-two-keys-delay 0.5)
  18 (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
  19 (key-chord-mode 1)
  20 (define-key evil-normal-state-map [escape] 'keyboard-quit)
  21 (define-key evil-visual-state-map [escape] 'keyboard-quit)
  22 ;(define-key minibuffer-local-map [escape] 'minibuffer-keyboard-quit)
  23 ;(define-key minibuffer-local-ns-map [escape] 'minibuffer-keyboard-quit)
  24 ;(define-key minibuffer-local-completion-map [escape] 'minibuffer-keyboard-quit)
  25 ;(define-key minibuffer-local-must-match-map [escape] 'minibuffer-keyboard-quit)
  26 ;(define-key minibuffer-local-isearch-map [escape] 'minibuffer-keyboard-quit)
  27
  28
  29 ;; cursor shape
  30 (setq evil-emacs-state-cursor '("red" box))
  31 (setq evil-normal-state-cursor '("green" box))
  32 (setq evil-visual-state-cursor '("orange" box))
  33 (setq evil-insert-state-cursor '("red" bar))
  34 (setq evil-replace-state-cursor '("red" bar))
  35 (setq evil-operator-state-cursor '("red" hollow))
  36 ;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil
  37 (loop for (mode . state) in '(
  38 ;                           (inferior-emacs-lisp-mode . emacs)
  39 ;                           (wdired-mode . normal)
  40                             (eshell-mode . emacs))
  41     do (evil-set-initial-state mode state))
  42
  43
  44 ;(global-evil-tabs-mode t)
  45 (evil-mode 1)
  46
  47 (provide 'init-evil)