emacs.d/init.el

   1 ;;;(if (eq system-type 'darwin)
   2 ;;;  (setenv "PATH"
   3 ;;;)   (concat (getenv "path") ":/usr/local/bin:~/bin/")
   4 ;;;  )
   5
   6
   7 (setenv "PATH" (concat (getenv "PATH") ":/usr/local/bin"))
   8 (setq exec-path (append exec-path '("/usr/local/bin")))
   9
  10 (setq debug-on-error t)
  11
  12 (scroll-bar-mode -1)
  13 (tool-bar-mode -1)
  14 ;(menu-bar-mode -1)
  15 (add-to-list 'default-frame-alist '(width  . 120))
  16 (add-to-list 'default-frame-alist '(height . 40))
  17 ;(add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12:weight:light" ))
  18 (add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-14" ))
  19 (setq inhibit-startup-message t)
  20
  21 (put 'set-goal-column 'disabled nil)
  22 (setq vc-follow-symlinks t)
  23 (setq visible-bell 1)
  24 (setq ring-bell-function 'ignore)
  25 (setq resize-mini-windows t)
  26 (blink-cursor-mode 0)
  27
  28
  29 (add-to-list 'auto-mode-alist '("emacs\\'" . emacs-lisp-mode))
  30 (fringe-mode 0)
  31
  32
  33
  34 ;;; Set symbol for the border
  35 (set-display-table-slot standard-display-table
  36                         'vertical-border
  37                         (make-glyph-code ?┃))
  38
  39 (set-face-attribute 'vertical-border nil  :foreground "gray")
  40
  41
  42 (add-to-list 'load-path "~/.emacs.d/config")
  43 (require 'my-packages)
  44
  45 ;; elscreen should be placed begin of https://github.com/knu/elscreen/issues/6
  46 ;(elscreen-start)
  47 ;(require 'init-elscreen)
  48 (require 'init-color-theme)
  49
  50
  51 ;---------------------------------------------------------------------------------------
  52 ;; Ido
  53 ;;
  54 (require 'ido-vertical-mode)
  55 (ido-vertical-mode 1)
  56 (require 'flx-ido)
  57 (ido-mode 1)
  58 (ido-everywhere 1)
  59 (flx-ido-mode 1)
  60 (setq ido-use-faces nil)
  61
  62 (setq org-completion-use-ido t)
  63 (setq magit-completing-read-function 'magit-ido-completing-read)
  64
  65 (require 'ido-ubiquitous)
  66 (ido-ubiquitous-mode 1)
  67
  68 ;; smex
  69 (require 'smex)
  70 (global-set-key (kbd "M-x") 'smex)
  71 (global-set-key (kbd "M-X") 'smex-major-mode-commands)
  72
  73 ;;---------------------------------------------------------------------------------------
  74 ;; Magit
  75 ;;
  76 (require 'magit)
  77 (setq magit-last-seen-setup-instructions "1.4.0")
  78 (global-set-key (kbd "C-x g") 'magit-status)
  79 ;(setq magit-auto-revert-mode nil)
  80
  81
  82 (require 'init-evil)
  83
  84
  85
  86 ;;---------------------------------------------------------------------------------------
  87 ;; Fiplr
  88 ;;
  89 (setq fiplr-root-markers '(".git" ".svn" "*.DS_Store"))
  90 (setq fiplr-ignored-globs '((directories (".git" ".svn"))
  91                             (files ("*.jpg" "*.png" "*.zip" "*~" "*.o" ".obj" "*.swp" "*.hg" ".pyc" ".*" ))))
  92
  93 (global-set-key (kbd "C-x f") 'fiplr-find-file)
  94
  95
  96 ;;---------------------------------------------------------------------------------------
  97 ;; sr-speedbar
  98 ;;
  99 ;(require 'sr-speedbar)
 100 ;(setq speedbar-use-images nil)
 101 ;(setq speedbar-show-unknown-files t)
 102
 103
 104
 105
 106 (require 'projectile)
 107 (projectile-global-mode)
 108 (setq projectile-enable-caching t)
 109 (require 'projectile-speedbar)
 110
 111 ;(require 'cc-mode)
 112 ;(require 'ecb)
 113
 114 ;(setq ecb-layout-name "leftright3")
 115
 116 ;; gnu global support
 117 ;(require 'semantic/db)
 118 ;(global-semanticdb-minor-mode 1)
 119
 120 (require 'init-ggtags)
 121
 122
 123 (setq scroll-margin 5)
 124 (setq scroll-conservatively 10000)
 125 (show-paren-mode t)
 126
 127
 128 (require 'init-c-cpp)
 129
 130 (require 'recentf)
 131 (recentf-mode 1)
 132 (setq recentf-max-menu-items 100)
 133
 134
 135 (require 'recentf-ext)
 136
 137 (require 'init-key-binding)
 138
 139 (require 'linum-relative)
 140 (winner-mode 1)
 141
 142 (global-set-key (kbd "C-c C-l") 'winner-redo)
 143 (global-set-key (kbd "C-c C-h") 'winner-undo)
 144
 145
 146
 147 ;(require 'minibuffer-tray)
 148 ;(require 'eyebrowse)
 149 ;(eyebrowse-mode t)
 150
 151 (require 'workgroups2)
 152 ;;;;(workgroups-mode 1)
 153
 154
 155 ;;(require 'minibuffer-line)
 156 ;(minibuffer-line-mode 1)
 157
 158
 159 ;(add-to-list 'load-path "~/.emacs.d/vendor")
 160 ;(require 'minibuffer-tray)
 161 ;(minibuffer-tray-mode 1)
 162 ;(require 'xwem-minibuffer)
 163
 164 ; (run-at-time
 165 ;  nil 30
 166 ;  (lambda ()
 167 ;    (with-current-buffer " *Minibuf-0*"
 168 ;      (erase-buffer)
 169 ;      (dotimes (spaces (- (frame-width) 20))
 170 ;        (insert " "))
 171 ;      (insert (format-time-string "%m-%d  %I:%M %p %a ")))))
 172