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
35 (add-to-list 'package-archives
36 '("melpa" . "http://melpa.milkbox.net/packages/") t)
39 (defvar required-packages
49 color-theme-sanityinc-tomorrow
61 color-identifiers-mode
67 ) "a list of packages to ensure are installed at launch.")
70 (defun packages-installed-p ()
71 (loop for p in required-packages
72 when (not (package-installed-p p)) do (return nil)
75 (unless (packages-installed-p)
76 (message "%s" "Emacs is now refreshing its package database...")
77 (package-refresh-contents)
78 (message "%s" " done.")
79 (dolist (p required-packages)
80 (when (not (package-installed-p p))
81 (package-install p))))
83 ;;---------------------------------------------------------------------------------------
86 (require 'color-theme)
87 ;(load-theme 'sanityinc-tomorrow-bright t)
88 (load-theme 'tangotango t)
94 (powerline-default-theme)
96 ;(add-to-list 'load-path "~/.emacs.d/config")
97 ;(require 'init-color-theme)
98 ;---------------------------------------------------------------------------------------
101 (require 'ido-vertical-mode)
102 (ido-vertical-mode 1)
107 (setq ido-use-faces nil)
109 (setq org-completion-use-ido t)
110 (setq magit-completing-read-function 'magit-ido-completing-read)
112 (require 'ido-ubiquitous)
113 (ido-ubiquitous-mode 1)
117 (global-set-key (kbd "M-x") 'smex)
118 (global-set-key (kbd "M-X") 'smex-major-mode-commands)
120 ;;---------------------------------------------------------------------------------------
124 (setq magit-last-seen-setup-instructions "1.4.0")
125 ;(setq magit-auto-revert-mode nil)
130 ;;---------------------------------------------------------------------------------------
133 (global-evil-leader-mode)
134 (evil-leader/set-leader ";")
135 (evil-leader/set-key "e" 'find-file)
136 (evil-leader/set-key "b" 'switch-to-buffer)
137 (evil-leader/set-key "w" 'evil-write)
139 ;(setq key-chord-two-keys-delay 0.5)
140 (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
144 (setq evil-emacs-state-cursor '("red" box))
145 (setq evil-normal-state-cursor '("green" box))
146 (setq evil-visual-state-cursor '("orange" box))
147 (setq evil-insert-state-cursor '("red" bar))
148 (setq evil-replace-state-cursor '("red" bar))
149 (setq evil-operator-state-cursor '("red" hollow))
150 ;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil
151 (loop for (mode . state) in '(
152 ; (inferior-emacs-lisp-mode . emacs)
153 ; (nrepl-mode . insert)
154 ; (pylookup-mode . emacs)
155 ; (comint-mode . normal)
156 ; (shell-mode . emacs)
157 ; (git-commit-mode . insert)
158 ; (git-rebase-mode . emacs)
159 ; (term-mode . emacs)
160 ; (help-mode . emacs)
161 ; (helm-grep-mode . emacs)
162 ; (grep-mode . emacs)
163 ; (bc-menu-mode . emacs)
164 ; (magit-branch-manager-mode . emacs)
165 ; (rdictcc-buffer-mode . emacs)
166 ; (dired-mode . emacs)
167 ; (wdired-mode . normal)
168 (eshell-mode . emacs))
169 do (evil-set-initial-state mode state))
173 ;;---------------------------------------------------------------------------------------
176 (setq fiplr-root-markers '(".git" ".svn" "*.DS_Store"))
177 (setq fiplr-ignored-globs '((directories (".git" ".svn"))
178 (files ("*.jpg" "*.png" "*.zip" "*~" "*.o" ".obj" "*.swp" "*.hg" ".pyc" ".*" ))))
180 (global-set-key (kbd "C-x f") 'fiplr-find-file)
182 ;;---------------------------------------------------------------------------------------
185 (global-set-key (kbd "C-x C-l") 'windmove-right)
186 (global-set-key (kbd "C-x C-h") 'windmove-left)
187 (global-set-key (kbd "C-x C-k") 'windmove-up)
188 (global-set-key (kbd "C-x C-j") 'windmove-down)
191 ;;---------------------------------------------------------------------------------------
194 (set-face-attribute 'vertical-border nil :foreground "gray")
196 ;(add-to-list 'load-path "~/.emacs.d/config")
197 ;(require 'init-color-theme)