emacs: key-binding
[dotfiles.git] / 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-12" ))
19
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
27
28 (add-to-list 'auto-mode-alist '("emacs\\'" . emacs-lisp-mode))
29 (fringe-mode 0)
30
31
32
33 ;;; Set symbol for the border
34 (set-display-table-slot standard-display-table
35                         'vertical-border 
36                         (make-glyph-code ?┃))
37
38 (set-face-attribute 'vertical-border nil  :foreground "gray")
39
40
41 (add-to-list 'load-path "~/.emacs.d/config")
42 (require 'my-packages)
43
44 ;; elscreen should be placed begin of https://github.com/knu/elscreen/issues/6
45 (elscreen-start)
46 (require 'init-elscreen)
47 (require 'init-color-theme)
48
49
50 ;---------------------------------------------------------------------------------------
51 ;; Ido
52 ;;
53 (require 'ido-vertical-mode)
54 (ido-vertical-mode 1)
55 (require 'flx-ido)
56 (ido-mode 1)
57 (ido-everywhere 1)
58 (flx-ido-mode 1)
59 (setq ido-use-faces nil)
60
61 (setq org-completion-use-ido t)
62 (setq magit-completing-read-function 'magit-ido-completing-read)
63
64 (require 'ido-ubiquitous)
65 (ido-ubiquitous-mode 1)
66
67 ;; smex
68 (require 'smex) 
69 (global-set-key (kbd "M-x") 'smex)
70 (global-set-key (kbd "M-X") 'smex-major-mode-commands)
71
72 ;;---------------------------------------------------------------------------------------
73 ;; Magit
74 ;;
75 (require 'magit)
76 (setq magit-last-seen-setup-instructions "1.4.0")
77 (global-set-key (kbd "C-x g") 'magit-status)
78 ;(setq magit-auto-revert-mode nil)
79
80
81 ;(require 'init-evil)
82
83
84
85 ;;---------------------------------------------------------------------------------------
86 ;; Fiplr
87 ;;
88 (setq fiplr-root-markers '(".git" ".svn" "*.DS_Store"))
89 (setq fiplr-ignored-globs '((directories (".git" ".svn"))
90                             (files ("*.jpg" "*.png" "*.zip" "*~" "*.o" ".obj" "*.swp" "*.hg" ".pyc" ".*" ))))
91
92 (global-set-key (kbd "C-x f") 'fiplr-find-file)
93
94
95 ;;---------------------------------------------------------------------------------------
96 ;; sr-speedbar
97 ;;
98 ;(require 'sr-speedbar)
99 ;(setq speedbar-use-images nil)
100 ;(setq speedbar-show-unknown-files t)
101
102
103 ;(toggle-frame-fullscreen)
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)