Adds smart Evil mode bindings and external plugins
This commit is contained in:
parent
893956db0c
commit
f2facdb949
1 changed files with 75 additions and 4 deletions
|
@ -3,11 +3,22 @@
|
||||||
(require 'package)
|
(require 'package)
|
||||||
(add-to-list 'package-archives '("melpa" . "http://melpa.org/packages/"))
|
(add-to-list 'package-archives '("melpa" . "http://melpa.org/packages/"))
|
||||||
(custom-set-variables
|
(custom-set-variables
|
||||||
|
;; custom-set-variables was added by Custom.
|
||||||
|
;; If you edit it by hand, you could mess it up, so be careful.
|
||||||
|
;; Your init file should contain only one such instance.
|
||||||
|
;; If there is more than one, they won't work right.
|
||||||
'(mouse-wheel-mode nil)
|
'(mouse-wheel-mode nil)
|
||||||
|
'(neo-window-fixed-size nil)
|
||||||
|
'(neo-window-width 35)
|
||||||
'(package-selected-packages
|
'(package-selected-packages
|
||||||
(quote
|
(quote
|
||||||
(evil helm-swoop iedit vimrc-mode helm-ispell transpose-frame helm-projectile helm-ack nyan-mode alchemist helm magit dockerfile-mode elixir-mode elm-mode ack))))
|
(neotree evil helm-swoop iedit vimrc-mode helm-ispell transpose-frame helm-projectile helm-ack nyan-mode alchemist helm magit dockerfile-mode elixir-mode elm-mode ack))))
|
||||||
(custom-set-faces)
|
(custom-set-faces
|
||||||
|
;; custom-set-faces was added by Custom.
|
||||||
|
;; If you edit it by hand, you could mess it up, so be careful.
|
||||||
|
;; Your init file should contain only one such instance.
|
||||||
|
;; If there is more than one, they won't work right.
|
||||||
|
'(hl-line ((t (:background "gray7")))))
|
||||||
|
|
||||||
;; Colorscheme
|
;; Colorscheme
|
||||||
(load-theme 'wombat)
|
(load-theme 'wombat)
|
||||||
|
@ -15,6 +26,9 @@
|
||||||
;; Emacs backup files
|
;; Emacs backup files
|
||||||
(setq-default make-backup-files nil)
|
(setq-default make-backup-files nil)
|
||||||
|
|
||||||
|
;; Automatically follow symlinks
|
||||||
|
(setq vc-follow-symlinks t)
|
||||||
|
|
||||||
;; NyanCat progress bar
|
;; NyanCat progress bar
|
||||||
;; (nyan-mode)
|
;; (nyan-mode)
|
||||||
|
|
||||||
|
@ -65,6 +79,27 @@
|
||||||
(require 'evil)
|
(require 'evil)
|
||||||
|
|
||||||
|
|
||||||
|
;; NeoTree Settings
|
||||||
|
(require 'neotree)
|
||||||
|
|
||||||
|
(defun neotree-project-dir ()
|
||||||
|
"Open NeoTree using the git root."
|
||||||
|
(interactive)
|
||||||
|
(let ((project-dir (projectile-project-root))
|
||||||
|
(file-name (buffer-file-name)))
|
||||||
|
(neotree-toggle)
|
||||||
|
(if project-dir
|
||||||
|
(if (neo-global--window-exists-p)
|
||||||
|
(progn
|
||||||
|
(neotree-dir project-dir)
|
||||||
|
(neotree-find file-name)))
|
||||||
|
(message "Could not find git project root."))))
|
||||||
|
|
||||||
|
(global-set-key (kbd "<f8>") 'neotree-project-dir)
|
||||||
|
|
||||||
|
(add-hook 'neotree-mode-hook (lambda () (bootstrap-evil-mode) (hl-line-mode)) )
|
||||||
|
|
||||||
|
|
||||||
;; Buffer scrolling functions
|
;; Buffer scrolling functions
|
||||||
(global-set-key (kbd "M-n") (lambda () (interactive) (scroll-up 1) (next-line 1)))
|
(global-set-key (kbd "M-n") (lambda () (interactive) (scroll-up 1) (next-line 1)))
|
||||||
(global-set-key (kbd "M-p") (lambda () (interactive) (scroll-down 1) (previous-line 1)))
|
(global-set-key (kbd "M-p") (lambda () (interactive) (scroll-down 1) (previous-line 1)))
|
||||||
|
@ -96,14 +131,50 @@
|
||||||
;; Change font settings
|
;; Change font settings
|
||||||
(add-to-list 'default-frame-alist '(font . "Hasklig"))
|
(add-to-list 'default-frame-alist '(font . "Hasklig"))
|
||||||
|
|
||||||
|
|
||||||
|
;; Personalized Evil-mode settings
|
||||||
(defun bootstrap-evil-mode()
|
(defun bootstrap-evil-mode()
|
||||||
"Custom evil-mode boostrapping"
|
"Custom evil-mode settings. This disables Emacs key-bindings found in
|
||||||
|
`global-map` when inside Vim's `normal` mode. It disables Vim key-bindings
|
||||||
|
when in Vim's `insert` mode, favoring native Emacs bindings instead."
|
||||||
(interactive)
|
(interactive)
|
||||||
(evil-local-mode)
|
(evil-local-mode)
|
||||||
|
|
||||||
|
;; Toggle off Emacs bindings when in Vim `normal` mode except:
|
||||||
|
;; * `M-x`
|
||||||
|
;; (setcdr global-map nil)
|
||||||
|
;; (define-key global-map (kbd "M-x") 'helm-M-x)
|
||||||
|
|
||||||
|
;; unbind <SPC> and <CR> in normal mode since they're hardly used
|
||||||
|
(define-key evil-motion-state-map (kbd "RET") nil)
|
||||||
|
(define-key evil-motion-state-map (kbd "SPC") nil)
|
||||||
|
|
||||||
|
;; use 'helm-swoop for interactive search
|
||||||
|
(define-key evil-motion-state-map (kbd "/") 'helm-swoop)
|
||||||
|
|
||||||
|
(define-key evil-normal-state-map (kbd "C-h") 'evil-window-left)
|
||||||
|
(define-key evil-normal-state-map (kbd "C-l") 'evil-window-right)
|
||||||
|
(define-key evil-normal-state-map (kbd "C-k") 'evil-window-up)
|
||||||
|
(define-key evil-normal-state-map (kbd "C-j") 'evil-window-down)
|
||||||
|
|
||||||
|
(define-key evil-normal-state-map (kbd "M-l") (lambda () (interactive) (evil-window-vsplit) (evil-window-right 1) ))
|
||||||
|
(define-key evil-normal-state-map (kbd "M-h") (lambda () (interactive) (evil-window-vsplit) ))
|
||||||
|
(define-key evil-normal-state-map (kbd "M-j") (lambda () (interactive) (evil-window-split) (evil-window-down 1) ))
|
||||||
|
(define-key evil-normal-state-map (kbd "M-k") (lambda () (interactive) (evil-window-split) ))
|
||||||
|
|
||||||
|
;; Toggle off Vim bindings when in Vim `insert` mode except:
|
||||||
|
;; * `<escape>` <ESC>
|
||||||
|
;; * `j k` <ESC>
|
||||||
|
;; * `j j` "j"
|
||||||
|
(setcdr evil-insert-state-map nil)
|
||||||
|
(define-key evil-insert-state-map (kbd "<escape>") 'evil-force-normal-state)
|
||||||
(define-key evil-insert-state-map (kbd "j k") 'evil-force-normal-state)
|
(define-key evil-insert-state-map (kbd "j k") 'evil-force-normal-state)
|
||||||
(define-key evil-normal-state-map (kbd "H") 'evil-beginning-of-line)
|
(define-key evil-insert-state-map (kbd "jj") (lambda () (interactive) (insert "j")))
|
||||||
|
|
||||||
|
(define-key evil-normal-state-map (kbd "H") 'evil-first-non-blank)
|
||||||
(define-key evil-normal-state-map (kbd "L") 'evil-end-of-line))
|
(define-key evil-normal-state-map (kbd "L") 'evil-end-of-line))
|
||||||
|
|
||||||
|
|
||||||
;; Line Numbers in margin for source code mode
|
;; Line Numbers in margin for source code mode
|
||||||
(add-hook 'prog-mode-hook 'linum-mode)
|
(add-hook 'prog-mode-hook 'linum-mode)
|
||||||
(add-hook 'prog-mode-hook 'bootstrap-evil-mode)
|
(add-hook 'prog-mode-hook 'bootstrap-evil-mode)
|
||||||
|
|
Loading…
Reference in a new issue