X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Fconfig%2Finit-evil.el;h=3e7856e301db9fcff198210e125a3fdb96bb387a;hb=05dd68bf8e1100c41357b025b4becf69c79689e4;hp=0faabe2d464bbe368643b595a1a5823911cca727;hpb=01c391c25bb1a8e2e4cf856ae2268f47ae6c3a8f;p=dotfiles.git diff --git a/emacs.d/config/init-evil.el b/emacs.d/config/init-evil.el index 0faabe2..3e7856e 100644 --- a/emacs.d/config/init-evil.el +++ b/emacs.d/config/init-evil.el @@ -4,13 +4,10 @@ ;; (require 'evil) + (defalias 'evil-insert-state 'evil-emacs-state) -;; C-o C-o switch to normal mode, defined in config/init-key-binding.el -;;;(global-set-key (kbd "C-o C-o") 'evil-normal-state) ;;https://github.com/toumorokoshi/yt.rc/blob/master/emacs/my-evil.el -;; let's disable keymaps we don't want. -;; basically, anything that uses C or M (define-key evil-visual-state-map "\C-w" nil) ;(define-key evil-normal-state-map (kbd "M-.") nil) (define-key evil-normal-state-map "\C-t" nil) @@ -23,43 +20,41 @@ (define-key evil-normal-state-map "\C-o" nil) +;; M-e not works correctly in evil-normal mode, this fix it +(define-key evil-normal-state-map "\M-e" (lambda() (interactive) + (forward-sentence 2))) +(define-key evil-motion-state-map "\C-e" (move-end-of-line 1)) + + +;; most common keys in normal-mode to swith buffer, project, windows, +;; in emacs mode, Esc + s + x, the same (global-evil-leader-mode) (evil-leader/set-leader "s") -(evil-leader/set-key "j" 'helm-mini) -(evil-leader/set-key "k" 'helm-find-files) +(evil-leader/set-key "j" 'pl-switch-buffers) +(evil-leader/set-key "h" 'persp-switch) +(evil-leader/set-key "k" 'helm-cmd-t) +(evil-leader/set-key "b" 'helm-mini) +(evil-leader/set-key "m" 'helm-mini) + (setq key-chord-two-keys-delay 0.5) (key-chord-define evil-insert-state-map "jj" 'evil-normal-state) (key-chord-define evil-emacs-state-map "jj" 'evil-normal-state) - -(key-chord-define evil-normal-state-map ";w" 'save-buffer) (key-chord-define evil-normal-state-map ";s" 'split-window-below) (key-chord-define evil-normal-state-map ";v" 'split-window-right) -(key-chord-define evil-normal-state-map ";;" 'helm-find-files) - (key-chord-mode 1) (define-key evil-normal-state-map [escape] 'keyboard-quit) (define-key evil-visual-state-map [escape] 'keyboard-quit) -;(define-key minibuffer-local-map [jscape] 'minibuffer-keyboard-quit) -;(define-key minibuffer-local-ns-map [escape] 'minibuffer-keyboard-quit) -;(define-key minibuffer-local-completion-map [escape] 'minibuffer-keyboard-quit) -;(define-key minibuffer-local-must-match-map [escape] 'minibuffer-keyboard-quit) -;(define-key minibuffer-local-isearch-map [escape] 'minibuffer-keyboard-quit) - - -;; cursor shape -;(setq evil-emacs-state-cursor '("red" box)) -(setq evil-emacs-state-cursor '("red" bar)) +(setq evil-emacs-state-cursor '("red" box)) (setq evil-normal-state-cursor '("green" box)) (setq evil-visual-state-cursor '("orange" box)) (setq evil-insert-state-cursor '("red" bar)) (setq evil-replace-state-cursor '("red" bar)) (setq evil-operator-state-cursor '("red" hollow)) -;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil (loop for (mode . state) in '( (nrepl-mode . insert) (pylookup-mode . emacs) @@ -73,8 +68,10 @@ (grep-mode . emacs) (bc-menu-mode . emacs) (magit-branch-manager-mode . emacs) + (magit-popup-mode . emacs) (rdictcc-buffer-mode . emacs) (dired-mode . emacs) + (text-mode . emacs) (wdired-mode . normal) ; (inferior-emacs-lisp-mode . emacs) ; (wdired-mode . normal)