public
Fork of topfunky/emacs-starter-kit
Description: All the code you need to get started, with an emphasis on dynamic languages.
Homepage:
Clone URL: git://github.com/arunthampi/emacs-starter-kit.git
emacs-starter-kit / arun.el
100644 100 lines (70 sloc) 2.577 kb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
;; DESCRIPTION: arun settings
 
(add-to-list 'load-path (concat dotfiles-dir "/vendor"))
 
;; Snippets
(add-to-list 'load-path (concat dotfiles-dir "/vendor/yasnippet.el"))
(require 'yasnippet)
(yas/initialize)
(yas/load-directory (concat dotfiles-dir "/vendor/yasnippet.el/snippets"))
 
;; Commands
(require 'unbound)
 
;; Minor Modes
(add-to-list 'load-path (concat dotfiles-dir "/vendor/textmate.el"))
(require 'textmate)
(textmate-mode)
(require 'whitespace)
 
;; Major Modes
 
;; Rinari
;; (add-to-list 'load-path (concat dotfiles-dir "/vendor/rinari"))
;; (require 'rinari)
 
(require 'textile-mode)
(add-to-list 'auto-mode-alist '("\\.textile\\'" . textile-mode))
 
(autoload 'markdown-mode "markdown-mode.el"
  "Major mode for editing Markdown files" t)
 
(require 'haml-mode)
(add-to-list 'auto-mode-alist '("\\.haml$" . haml-mode))
 
(require 'sass-mode)
(add-to-list 'auto-mode-alist '("\\.sass$" . sass-mode))
 
(add-to-list 'auto-mode-alist '("\\.sake\\'" . ruby-mode))
 
;; Color Themes
(add-to-list 'load-path (concat dotfiles-dir "/vendor/color-theme"))
(require 'color-theme)
(color-theme-initialize)
(color-theme-vivid-chalk)
 
 
;; Functions
 
(require 'line-num)
 
;; Full screen toggle
(defun toggle-fullscreen ()
  (interactive)
  (set-frame-parameter nil 'fullscreen (if (frame-parameter nil 'fullscreen)
                                           nil
                                         'fullboth)))
(global-set-key (kbd "M-n") 'toggle-fullscreen)
 
;; Multi-term
(require 'multi-term)
(multi-term-keystroke-setup)
(setq multi-term-program "/bin/bash")
 
;; TE for terminal
(global-set-key (kbd "M-e") 'multi-term)
 
;; Keyboard
 
;; Split Windows
(global-set-key [f6] 'split-window-horizontally)
(global-set-key [f7] 'split-window-vertically)
(global-set-key [f8] 'delete-window)
 
;; Some Mac-friendly key counterparts
(global-set-key (kbd "M-s") 'save-buffer)
(global-set-key (kbd "M-z") 'undo)
 
;; Keyboard Overrides
(define-key textile-mode-map (kbd "M-s") 'save-buffer)
(define-key text-mode-map (kbd "M-s") 'save-buffer)
 
(global-set-key [(meta up)] 'beginning-of-buffer)
(global-set-key [(meta down)] 'end-of-buffer)
 
(global-set-key [(meta shift right)] 'ido-switch-buffer)
(global-set-key [(meta shift up)] 'recentf-ido-find-file)
(global-set-key [(meta shift down)] 'ido-find-file)
(global-set-key [(meta shift left)] 'magit-status)
 
(global-set-key [(meta H)] 'delete-other-windows)
 
(global-set-key [(meta D)] 'backward-kill-word) ;; (meta d) is opposite
 
(global-set-key [(meta N)] 'cleanup-buffer)
 
;; Other
 
(prefer-coding-system 'utf-8)
 
(server-start)