-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathinit.el
126 lines (98 loc) · 3.37 KB
/
init.el
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
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
;; 文字コード
(set-keyboard-coding-system 'utf-8)
(set-default-coding-systems 'utf-8)
;; nihongo入力
(require 'mozc)
(setq default-input-method "japanese-mozc")
(global-set-key [zenkaku-hankaku] 'toggle-input-method)
(add-hook 'mozc-mode-hook
(lambda()
(define-key mozc-mode-map (kbd "<zenkaku-hankaku>") 'toggle-input-method)))
;; キーバインディング
(global-set-key "\C-h" 'delete-backward-char)
(global-set-key "\C-z" 'undo)
(global-set-key "\C-x\C-g" 'goto-line)
(global-set-key "\M-w" 'clipboard-kill-ring-save)
(global-set-key "\C-w" 'clipboard-kill-region)
;;フレームのサイズ
(setq initial-frame-alist
(append
'((top . 200)
(left . 600)
(width . 120)
(height . 40)
(cursor-type . bar)
)
initial-frame-alist))
(setq default-frame-alist initial-frame-alist)
;; ホイールの加速度を無効化
(setq mouse-wheel-progressive-speed nil)
;; 対応する括弧を強調
(show-paren-mode 1)
;; メニューバーを消す
(menu-bar-mode -1)
;; ツールバーを消す
(tool-bar-mode -1)
;; バックアップファイルを作らない
(setq backup-inhibited t)
;; 終了時にオートセーブファイルを消す
(setq delete-auto-save-files t)
(setq auto-save-default nil)
;; カーソルの位置が何文字目かを表示する
(column-number-mode t)
;; カーソルの位置が何行目かを表示する
(line-number-mode t)
;; 行末の空白を表示
(setq-default show-trailing-whitespace t)
;; ミニバッファの履歴を保存する
(savehist-mode 1)
;; 行番号を表示
(global-linum-mode)
;; タイトルバーにバッファの名前を表示
(setq frame-title-format "%f")
;; 起動画面はいらない
(setq inhibit-startup-message t)
;; スクロールバーを右側に表示する
(set-scroll-bar-mode 'right)
;; テーマ
(eval-after-load "color-theme"
'(progn
(color-theme-initialize)
(color-theme-taylor)))
;; Webモード
(load "~/.emacs.d/web-mode.el")
(add-to-list 'auto-mode-alist '("\\.twig\\'" . web-mode))
(add-to-list 'auto-mode-alist '("\\.volt\\'" . web-mode))
(add-to-list 'auto-mode-alist '("\\.html\\'" . web-mode))
(setq web-mode-engines-alist '(("php" . "\\.tpl\\'") ("django" . "\\.volt")))
(defun web-mode-hook ()
(setq web-mode-markup-indent-offset 4)
(setq web-mode-code-indent-offset 4)
(setq web-mode-indent-style 2)
(setq web-mode-disable-auto-pairing t)
)
(add-hook 'web-mode-hook 'web-mode-hook)
;; PHPモード
(load "~/.emacs.d/php-mode.el")
(add-to-list 'auto-mode-alist '("\\.php$" . php-mode))
;; YAMLモード
(load "~/.emacs.d/yaml-mode.el")
;; SCSSモード
(load "~/.emacs.d/scss-mode.el")
;; モードごとにインデント幅の指定
(add-hook 'sgml-mode-hook '(lambda () (setq sgml-basic-offset 4)))
(setq-default indent-tabs-mode nil)
(set-frame-font "Ricty-11")
;; eshell
(add-hook 'eshell-mode-hook '(lambda() (setq show-trailing-whitespace nil)))
;; sql
(require 'sql)
(eval-after-load "sql"
'(progn
(load-library "~/.emacs.d/sql-indent.el")
(load-library "~/.emacs.d/sql-complete.el")
(load-library "~/.emacs.d/sql-transform.el")))
(add-to-list 'auto-mode-alist '("\\.sql$" . sql-mode))
;; Markdown
(autoload 'markdown-mode "~/.emacs.d/markdown-mode.el" "Major mode for editing Markdown files" t)
(add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode))