1 (setq debug-on-error t)
6 (add-to-list 'default-frame-alist '(width . 120))
7 (add-to-list 'default-frame-alist '(height . 40))
8 ;(add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12:weight:light" ))
9 (add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12" ))
10 (load-theme 'tango-dark)
14 (put 'set-goal-column 'disabled nil)
15 (setq vc-follow-symlinks t)
17 (setq ring-bell-function 'ignore)
18 (setq resize-mini-windows t)
20 (setq ns-use-srgb-colorspace nil)
21 (add-to-list 'auto-mode-alist '("emacs\\'" . emacs-lisp-mode))
25 ;;; Set symbol for the border
26 (set-display-table-slot standard-display-table
30 ;;---------------------------------------------------------------------------------------
32 ;; http://y.tsutsumi.io/emacs-from-scratch-part-2-package-management.html
34 (add-to-list 'package-archives
35 '("melpa" . "http://melpa.milkbox.net/packages/") t)
38 (defvar required-packages
48 color-theme-sanityinc-tomorrow
60 color-identifiers-mode
62 ) "a list of packages to ensure are installed at launch.")
65 (defun packages-installed-p ()
66 (loop for p in required-packages
67 when (not (package-installed-p p)) do (return nil)
70 (unless (packages-installed-p)
71 (message "%s" "Emacs is now refreshing its package database...")
72 (package-refresh-contents)
73 (message "%s" " done.")
74 (dolist (p required-packages)
75 (when (not (package-installed-p p))
76 (package-install p))))
78 ;;---------------------------------------------------------------------------------------
81 (require 'color-theme)
82 (load-theme 'sanityinc-tomorrow-bright t)
84 ;;---------------------------------------------------------------------------------------
87 (require 'ido-vertical-mode)
93 (setq ido-use-faces nil)
95 (setq org-completion-use-ido t)
96 (setq magit-completing-read-function 'magit-ido-completing-read)
98 (require 'ido-ubiquitous)
99 (ido-ubiquitous-mode 1)
103 (global-set-key (kbd "M-x") 'smex)
104 (global-set-key (kbd "M-X") 'smex-major-mode-commands)
106 ;;---------------------------------------------------------------------------------------
110 (setq magit-last-seen-setup-instructions "1.4.0")
111 ;(setq magit-auto-revert-mode nil)
114 ;;---------------------------------------------------------------------------------------
117 (global-evil-leader-mode)
118 (evil-leader/set-leader ";")
119 (evil-leader/set-key "e" 'find-file)
120 (evil-leader/set-key "b" 'switch-to-buffer)
121 (evil-leader/set-key "w" 'evil-write)
123 ;(setq key-chord-two-keys-delay 0.5)
124 (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
128 (setq evil-emacs-state-cursor '("red" box))
129 (setq evil-normal-state-cursor '("green" box))
130 (setq evil-visual-state-cursor '("orange" box))
131 (setq evil-insert-state-cursor '("red" bar))
132 (setq evil-replace-state-cursor '("red" bar))
133 (setq evil-operator-state-cursor '("red" hollow))
134 ;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil
135 (loop for (mode . state) in '(
136 ; (inferior-emacs-lisp-mode . emacs)
137 ; (nrepl-mode . insert)
138 ; (pylookup-mode . emacs)
139 ; (comint-mode . normal)
140 ; (shell-mode . emacs)
141 ; (git-commit-mode . insert)
142 ; (git-rebase-mode . emacs)
143 ; (term-mode . emacs)
144 ; (help-mode . emacs)
145 ; (helm-grep-mode . emacs)
146 ; (grep-mode . emacs)
147 ; (bc-menu-mode . emacs)
148 ; (magit-branch-manager-mode . emacs)
149 ; (rdictcc-buffer-mode . emacs)
150 ; (dired-mode . emacs)
151 ; (wdired-mode . normal)
152 (eshell-mode . emacs))
153 do (evil-set-initial-state mode state))
157 ;;---------------------------------------------------------------------------------------
160 (setq fiplr-root-markers '(".git" ".svn" "*.DS_Store"))
161 (setq fiplr-ignored-globs '((directories (".git" ".svn"))
162 (files ("*.jpg" "*.png" "*.zip" "*~" "*.o" ".obj" "*.swp" "*.hg" ".pyc" ".*" ))))
164 (global-set-key (kbd "C-x f") 'fiplr-find-file)
166 ;;---------------------------------------------------------------------------------------
169 (global-set-key (kbd "C-x C-l") 'windmove-right)
170 (global-set-key (kbd "C-x C-h") 'windmove-left)
171 (global-set-key (kbd "C-x C-k") 'windmove-up)
172 (global-set-key (kbd "C-x C-j") 'windmove-down)
175 ;;---------------------------------------------------------------------------------------
178 (set-face-attribute 'vertical-border nil :foreground "gray")
180 (add-to-list 'load-path "~/.emacs.d/config")
181 (require 'init-color-theme)