emacs.d_old/init.el

   1
   2
   3 ;; Added by Package.el.  This must come before configurations of
   4 ;; installed packages.  Don't delete this line.  If you don't want it,
   5 ;; just comment it out by adding a semicolon to the start of the line.
   6 ;; You may delete these explanatory comments.
   7 ;(package-initialize)
   8
   9  (load-library "url-handlers")
  10
  11 (setenv "PATH" (concat (getenv "PATH") ":/usr/local/bin"))
  12 (setq exec-path (append exec-path '("/usr/local/bin")))
  13
  14 ;; package manager
  15 (require 'package)
  16
  17 (add-to-list 'package-archives
  18              '("melpa" . "http://melpa.milkbox.net/packages/") t)
  19 (add-to-list 'package-archives
  20              '("org" . "http://orgmode.org/elpa/") t)
  21 ;(add-to-list 'package-archives
  22 ;             '("marmalade" . "http://marmalade-repo.org/packages/") t)
  23
  24 (package-initialize)
  25
  26 ;; use-package
  27 (unless (package-installed-p 'use-package)
  28   (package-refresh-contents)
  29   (package-install 'use-package))
  30
  31 (require 'use-package)
  32
  33 ;;;;; load path
  34 (add-to-list 'load-path "~/.emacs.d/elisp")
  35
  36 ;;; load elisp config
  37 (require 'init-base)
  38 (require 'init-magit)
  39 (require 'init-helm)
  40 (require 'init-projectile)
  41 (require 'init-org)
  42
  43
  44
  45
  46
  47
  48
  49
  50
  51 (use-package ido-vertical-mode
  52   :ensure t)
  53
  54
  55 (use-package hydra
  56   :ensure t
  57   :config
  58   (hydra-add-font-lock))
  59
  60
  61 ;;;;;;;;;
  62 (use-package ace-jump-mode
  63   :commands ace-jump-mode
  64   :init
  65   (bind-key "C-." 'ace-jump-mode))
  66
  67 (use-package sublime-themes
  68   :ensure t
  69   :config
  70   (load-theme 'spolsky t)
  71   )
  72
  73 (use-package avy
  74   :ensure t
  75   )
  76
  77 (use-package use-package-chords
  78   :ensure t
  79   :config
  80   (key-chord-mode 1)
  81   (setq key-chord-two-keys-delay 0.5))
  82
  83 (use-package evil
  84   :ensure t
  85   :config
  86   (evil-mode t)
  87   (defalias 'evil-insert-state 'evil-emacs-state)
  88   (key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
  89   (key-chord-define evil-emacs-state-map "jj" 'evil-normal-state)
  90 ;  (setq evil-emacs-state-cursor '("red" box))
  91   (setq evil-emacs-state-cursor '("green" bar))
  92   (setq evil-normal-state-cursor '("green" box))
  93   (setq evil-visual-state-cursor '("orange" box))
  94   (setq evil-insert-state-cursor '("red" bar))
  95   (setq evil-replace-state-cursor '("red" bar))
  96   (setq evil-operator-state-cursor '("red" hollow))
  97   )
  98
  99 (use-package multi-term
 100   :ensure t
 101   )
 102
 103
 104
 105 ;(use-package smex
 106 ;  :ensure t
 107 ;  :init (smex-initialize)
 108 ;  :bind ("M-x" . smex)
 109 ;        ("M-X" . smex-major-mode-commands))
 110
 111
 112 (add-to-list 'load-path "~/.emacs.d/pde")
 113 (load "pde-load")
 114
 115 (add-to-list 'default-frame-alist '(fullscreen . maximized))
 116
 117
 118 (use-package org-bullets
 119   :ensure t
 120   :init
 121   (add-hook 'org-mode-hook
 122             (lambda ()
 123               (org-bullets-mode t))))
 124
 125 (org-bullets-mode t)
 126
 127 (setq org-hide-leading-stars t)
 128
 129 (setq org-src-fontify-natively t)
 130
 131 (font-lock-add-keywords 'org-mode
 132                     '(("\\(src_\\)\\([^[{]+\\)\\(\\[:.*\\]\\){\\([^}]*\\)}"
 133                        (1 '(:foreground "black" :weight 'normal :height 10)) ; src_ part
 134                        (2 '(:foreground "cyan" :weight 'bold :height 75 :underline "red")) ; "lang" part.
 135                        (3 '(:foreground "#555555" :height 70)) ; [:header arguments] part.
 136                        (4 'org-code) ; "code..." part.
 137                        )))
 138
 139
 140
 141
 142 ;(setq lispy-mode-hooks
 143 ;      '(clojure-mode-hook
 144 ;        emacs-lisp-mode-hook
 145 ;        lisp-mode-hook
 146 ;        scheme-mode-hook))
 147
 148 ;(dolist (hook lispy-mode-hooks)
 149 ;  (add-hook hook (lambda ()
 150 ;                   (setq show-paren-style 'expression)
 151 ;                   (paredit-mode)
 152 ;                   (rainbow-delimiters-mode))))
 153
 154
 155
 156 ;(add-to-list 'load-path "~/.emacs.d/config")
 157
 158 ;; remove custom setting out of init.el
 159 ;; http://emacsblog.org/2008/12/06/quick-tip-detaching-the-custom-file/
 160 ;(setq custom-file "~/.emacs.d/custom.el")
 161 ;(load custom-file 'noerror)
 162 ;(require 'my-packages)
 163 ;(require 'init-base)
 164 ;(require 'init-font)
 165
 166 ;(require 'init-helm)
 167
 168 ;(require 'init-color-theme)
 169 ;(require 'init-color-theme-2)
 170 ;(require 'init-ido)
 171 ;(require 'init-magit)
 172 ;(require 'init-evil)
 173 ;(require 'init-project)
 174 ;(require 'init-ggtags)
 175
 176 ;(require 'init-projectile)
 177
 178 ;;;; conflict with C-c . in org-mode, disable it temporarily
 179 ;;;;(require 'init-c-cpp)
 180 ;(require 'init-key-binding)
 181 ;(require 'init-winner)
 182 ;(require 'init-minibuffer)
 183 ;(require 'init-eshell)
 184
 185 ;; http://stackoverflow.com/questions/11484225/fix-an-auto-complete-mode-and-linum-mode-annoyance
 186 ;;;(ac-linum-workaround)
 187
 188
 189 ;(require 'init-mode-line)
 190 ;(require 'init-workgroup2)
 191 ;(require 'init-perl)
 192
 193 ;(add-to-list 'load-path "~/.emacs.d/Emacs-PDE-0.2.16/lisp/")
 194 ;(load "pde-load")                       ;
 195
 196 ;(require 'init-linum)
 197
 198 ;(require 'auto-complete)
 199 ;(require 'auto-complete-config)
 200 ;(ac-config-default)
 201
 202
 203
 204
 205 ;; page break configuration
 206 ;(require 'pp-c-l)
 207 ;(pretty-control-l-mode 1)
 208
 209 ;; persist command history of helm
 210 ;(require 'session)
 211 ;(add-hook 'after-init-hook 'session-initialize)
 212
 213
 214 ;(require 'use-package)
 215
 216 ;; persist command history of helm
 217 ;(use-package savehist
 218 ;  :init (savehist-mode)
 219 ;  :config
 220 ;  (setq history-length 1000
 221 ;        history-delete-duplicates t
 222 ;        savehist-additional-variables '(extended-command-history)))
 223
 224 ;;(savehist-mode)
 225 ;;  (setq history-length 1000
 226 ;;        history-delete-duplicates t
 227 ;;        savehist-additional-variables '(extended-command-history))
 228
 229 ;    (setq split-height-threshold 0)
 230
 231
 232
 233
 234
 235 ;;;(require 'helm-gtags)
 236 ;;;;(require 'setup-helm-gtags)
 237 ;;;;(helm-gtags-mode 1)
 238 ;;;;;; Enable helm-gtags-mode
 239 ;;;(add-hook 'c-mode-hook 'helm-gtags-mode)
 240 ;;;(add-hook 'c++-mode-hook 'helm-gtags-mode)
 241 ;;;(add-hook 'asm-mode-hook 'helm-gtags-mode)
 242 ;;;
 243 ;;;;; customize
 244 ;;;(custom-set-variables
 245 ;;; '(helm-gtags-path-style 'relative)
 246 ;;; '(helm-gtags-ignore-case t)
 247 ;;; '(helm-gtags-auto-update t))
 248 ;;;
 249 ;;;;; key bindings
 250 ;;;(eval-after-load "helm-gtags"
 251 ;;;  '(progn
 252 ;;;     (define-key helm-gtags-mode-map (kbd "M-t") 'helm-gtags-find-tag)
 253 ;;;     (define-key helm-gtags-mode-map (kbd "M-r") 'helm-gtags-find-rtag)
 254 ;;;     (define-key helm-gtags-mode-map (kbd "M-s") 'helm-gtags-find-symbol)
 255 ;;;     (define-key helm-gtags-mode-map (kbd "M-g M-p") 'helm-gtags-parse-file)
 256 ;;;     (define-key helm-gtags-mode-map (kbd "C-c <") 'helm-gtags-previous-history)
 257 ;;;     (define-key helm-gtags-mode-map (kbd "C-c >") 'helm-gtags-next-history)
 258 ;;;     (define-key helm-gtags-mode-map (kbd "M-,") 'helm-gtags-pop-stack)))
 259
 260
 261 ;(require 'icicles)
 262 ;(icy-mode 1)
 263
 264
 265 ;;(require 'init-org)
 266 ;(setq help-window-select t)
 267
 268
 269
 270 ;(require 'init-keychord)
 271
 272 ;(setq hydra-examples-verbatim t)
 273 ;(require 'init-hydra)
 274
 275
 276 ;(require 'ace-window)
 277 ;(global-set-key (kbd "M-p") 'ace-window)
 278
 279
 280 ;(require 'init-multi-term)
 281 ;(require 'init-projectile)
 282
 283 ;(require 'page-break-lines)
 284 ;(turn-on-page-break-lines-mode)
 285 ;(global-page-break-lines-mode 1)
 286
 287 ;(setq projectile-completion-system 'helm)
 288 ;(helm-projectile-on)
 289
 290
 291 ;; show projectile name in mode-line
 292
 293
 294 ;(if (locate-library "ediff")
 295 ;    (progn
 296 ;      (autoload 'ediff-files "ediff")
 297 ;      (autoload 'ediff-buffers "ediff")
 298 ;
 299 ;       (eval-after-load "ediff" '(progn
 300 ;                         (message "doing ediff customisation")
 301 ;                         (setq diff-switches               "-u"
 302 ;                               ediff-custom-diff-options   "-U3"
 303 ;                               ediff-split-window-function 'split-window-horizontally
 304 ;                               ediff-window-setup-function 'ediff-setu;p-windows-plain)
 305 ;
 306 ;                         (add-hook 'ediff-startup-hook 'ediff-toggle-w;ide-display)
 307 ;                         (add-hook 'ediff-cleanup-hook 'ediff-toggle-w;ide-display)
 308 ;                         (add-hook 'ediff-suspend-hook 'ediff-toggle-wide-display)))))
 309
 310
 311
 312 ;(defun update-diff-colors ()
 313 ;  "update the colors for diff faces"
 314 ;  (set-face-attribute 'diff-added nil
 315 ;                      :foreground "white" :background "blue")
 316 ;  (set-face-attribute 'diff-removed nil
 317 ;                      :foreground "white" :background "red3")
 318 ;  (set-face-attribute 'diff-changed nil
 319 ;                      :foreground "white" :background "purple"))
 320 ;(eval-after-load "diff-mode"
 321 ;  '(update-diff-colors))
 322
 323
 324
 325 ;(require 'helm-ag)
 326 ;(require 'flx)
 327 ;(flx-ido-mode t)
 328
 329
 330
 331 ;(fringe-mode (quote (0 . 0)))
 332
 333
 334 (custom-set-variables
 335  ;; custom-set-variables was added by Custom.
 336  ;; If you edit it by hand, you could mess it up, so be careful.
 337  ;; Your init file should contain only one such instance.
 338  ;; If there is more than one, they won't work right.
 339  '(package-selected-packages
 340    (quote
 341     (helm yasnippet workgroups2 w3m use-package tangotango-theme tabbar smex session rich-minority relative-line-numbers recentf-ext projectile-speedbar pp-c-l powerline persp-projectile paradox page-break-lines org-cliplink org-caldav org-bullets multi-term monokai-theme molokai-theme moe-theme minibuffer-line markdown-mode magit linum-relative key-chord jekyll-modes irony iedit ido-vertical-mode ido-ubiquitous icicles hydra highlight-tail highlight-escape-sequences highlight-current-line helm-projectile helm-ls-svn helm-ls-git helm-gtags helm-ag google-c-style ggtags flyspell-lazy flymake-google-cpplint flymake-cursor flx-ido fiplr eyebrowse evil-leader evil-escape ecb dired+ diff-hl cyberpunk-theme company color-theme-sanityinc-tomorrow color-theme color-identifiers-mode auto-complete-c-headers ace-window ace-jump-mode))))
 342 (custom-set-faces
 343  ;; custom-set-faces was added by Custom.
 344  ;; If you edit it by hand, you could mess it up, so be careful.
 345  ;; Your init file should contain only one such instance.
 346  ;; If there is more than one, they won't work right.
 347  )