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
68 ) "a list of packages to ensure are installed at launch.")
71 (defun packages-installed-p ()
72 (loop for p in required-packages
73 when (not (package-installed-p p)) do (return nil)
76 (unless (packages-installed-p)
77 (message "%s" "Emacs is now refreshing its package database...")
78 (package-refresh-contents)
79 (message "%s" " done.")
80 (dolist (p required-packages)
81 (when (not (package-installed-p p))
82 (package-install p))))
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)
116 ;;---------------------------------------------------------------------------------------
119 (global-evil-leader-mode)
120 (evil-leader/set-leader ";")
121 (evil-leader/set-key "e" 'find-file)
122 (evil-leader/set-key "b" 'switch-to-buffer)
123 (evil-leader/set-key "w" 'evil-write)
125 ;(setq key-chord-two-keys-delay 0.5)
126 (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
130 (setq evil-emacs-state-cursor '("red" box))
131 (setq evil-normal-state-cursor '("green" box))
132 (setq evil-visual-state-cursor '("orange" box))
133 (setq evil-insert-state-cursor '("red" bar))
134 (setq evil-replace-state-cursor '("red" bar))
135 (setq evil-operator-state-cursor '("red" hollow))
136 ;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil
137 (loop for (mode . state) in '(
138 ; (inferior-emacs-lisp-mode . emacs)
139 ; (nrepl-mode . insert)
140 ; (pylookup-mode . emacs)
141 ; (comint-mode . normal)
142 ; (shell-mode . emacs)
143 ; (git-commit-mode . insert)
144 ; (git-rebase-mode . emacs)
145 ; (term-mode . emacs)
146 ; (help-mode . emacs)
147 ; (helm-grep-mode . emacs)
148 ; (grep-mode . emacs)
149 ; (bc-menu-mode . emacs)
150 ; (magit-branch-manager-mode . emacs)
151 ; (rdictcc-buffer-mode . emacs)
152 ; (dired-mode . emacs)
153 ; (wdired-mode . normal)
154 (eshell-mode . emacs))
155 do (evil-set-initial-state mode state))
159 ;;---------------------------------------------------------------------------------------
162 (setq fiplr-root-markers '(".git" ".svn" "*.DS_Store"))
163 (setq fiplr-ignored-globs '((directories (".git" ".svn"))
164 (files ("*.jpg" "*.png" "*.zip" "*~" "*.o" ".obj" "*.swp" "*.hg" ".pyc" ".*" ))))
166 (global-set-key (kbd "C-x f") 'fiplr-find-file)
168 ;;---------------------------------------------------------------------------------------
171 (global-set-key (kbd "C-x C-l") 'windmove-right)
172 (global-set-key (kbd "C-x C-h") 'windmove-left)
173 (global-set-key (kbd "C-x C-k") 'windmove-up)
174 (global-set-key (kbd "C-x C-j") 'windmove-down)
177 ;;---------------------------------------------------------------------------------------
180 (set-face-attribute 'vertical-border nil :foreground "gray")
182 ;(add-to-list 'load-path "~/.emacs.d/config")
183 ;(require 'init-color-theme)
186 ;;;(defun color-theme-inkpot ()
187 ;;; "Color theme based on the Inkpot theme. Ported and tweaked by Per Vognsen."
189 ;;; (color-theme-install
190 ;;; '(color-theme-inkpot
191 ;;; ((foreground-color . "#cfbfad")
192 ;;; (background-color . "#1e1e27")
193 ;;; (border-color . "#3e3e5e")
194 ;;; (cursor-color . "#404040")
195 ;;; (background-mode . dark))
196 ;;; (region ((t (:background "#404040"))))
197 ;;; (highlight ((t (:background "#404040"))))
198 ;;; (fringe ((t (:background "#16161b"))))
199 ;;; (show-paren-match-face ((t (:background "#606060"))))
200 ;;; (isearch ((t (:bold t :foreground "#303030" :background "#cd8b60"))))
201 ;;; (modeline ((t (:bold t :foreground "#b9b9b9" :background "#3e3e5e"))))
202 ;;; (modeline-inactive ((t (:foreground "#708090" :background "#3e3e5e"))))
203 ;;; (modeline-buffer-id ((t (:bold t :foreground "#b9b9b9" :background "#3e3e5e"))))
204 ;;; (minibuffer-prompt ((t (:bold t :foreground "#708090"))))
205 ;;; (font-lock-builtin-face ((t (:foreground "#c080d0"))))
206 ;;; (font-lock-comment-face ((t (:foreground "#708090")))) ; original inkpot: #cd8b00
207 ;;; (font-lock-constant-face ((t (:foreground "#506dbd"))))
208 ;;; (font-lock-doc-face ((t (:foreground "#cd8b00"))))
209 ;;; (font-lock-function-name-face ((t (:foreground "#87cefa"))))
210 ;;; (font-lock-keyword-face ((t (:bold t :foreground "#c080d0"))))
211 ;;; (font-lock-preprocessor-face ((t (:foreground "309090"))))
212 ;;; (font-lock-reference-face ((t (:bold t :foreground "#808bed"))))
213 ;;; (font-lock-string-face ((t (:foreground "#ffcd8b" :background "#404040"))))
214 ;;; (font-lock-type-face ((t (:foreground "#ff8bff"))))
215 ;;; (font-lock-variable-name-face ((t nil)))
216 ;;; (font-lock-warning-face ((t (:foreground "#ffffff" :background "#ff0000"))))))
219 (require 'color-theme)
222 ;;---------------------------------------------------------------------------------------
224 ;; https://github.com/dimitri/el-get
227 (add-to-list 'load-path "~/.emacs.d/el-get/el-get")
229 (unless (require 'el-get nil 'noerror)
231 (url-retrieve-synchronously
232 "https://raw.githubusercontent.com/dimitri/el-get/master/el-get-install.el")
233 (goto-char (point-max))
234 (eval-print-last-sexp)))
236 (add-to-list 'el-get-recipe-path "~/.emacs.d/el-get-user/recipes")
239 (el-get-bundle seudut/color-theme-tangotango
240 ; :features color-theme-tangotango
241 ; (color-theme-tangotango)
246 ;(require 'color-theme-tangotango)
247 ;(color-theme-tangotango)
252 ;;---------------------------------------------------------------------------------------
255 ;;(require 'color-theme)
256 ;;; this color theme no bold style
257 ;(load-theme 'sanityinc-tomorrow-night t)
258 ;(load-theme 'sanityinc-tomorrow-bright t)
259 ;; this theme no italic for comment
260 ;(load-theme 'tangotango t)
261 ;(load-theme 'cyberpunk t)
263 ;(require 'moe-theme)
266 (add-to-list 'custom-theme-load-path "~/.emacs.d/el-get/color-theme-tangotango")
267 (load-theme 'tangotango t)
270 (powerline-default-theme)
273 (add-to-list 'load-path "~/.emacs.d/config")
274 ;(require 'init-color-theme)
275 ;(require 'init-color-theme)
276 ;(color-theme-inkpot)
278 ;;(require 'color-theme-tangotango)
279 ;;(color-theme-tangotango)