Repository navigation
Expand file tree
/
Copy pathmy-init.el
More file actions
87 lines (77 loc) · 2.29 KB
/
Copy pathmy-init.el
File metadata and controls
87 lines (77 loc) · 2.29 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
;; -*- coding:utf-8; -*-
(require 'my-common)
(require 'my-theme)
;; * run server for emacsclient
(unless (daemonp)
(progn
(require 'server)
(setq server-port 15678)
(setq server-use-tcp t)
(if macp
(setq ns-pop-up-frames nil)
(require 'server)
(when (and (>= emacs-major-version 23)
(equal window-system 'w32))
(defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error "directory
; ~/.emacs.d/server is unsafe"
; on windows.
(server-start)
)))
;; ---------------------------
(require 'my-el-get)
;; * Path
;; 이상하게도, mac에서는 PATH가 종종 내가 설정해 놓은 게 아닌 걸로 실행된다.
(when (memq window-system '(mac ns))
(exec-path-from-shell-initialize))
(require 'my-editing)
(require 'my-programming) ;; for all except c/c++
;; (require 'my-python)
(require 'my-cc-mode) ;; for c/c++ mode only
(require 'my-dired)
(require 'my-shell)
;; ;; (require 'my-svn)
;; ;; (require 'my-web)
(require 'my-grep)
(require 'my-isearch)
(require 'my-ido)
(require 'my-tags)
;; (require 'my-org)
;; (require 'my-org-page)
;; (unless (daemonp)
;; (require 'my-font))
;; final big brother that can handle many configuration
;;
;; NOTE: this package should be followed at last
(require 'my-helm)
;; make cleaner modeline even with multiple minor modes
;; hint from http://whattheemacsd.com/init.el-04.html
(when (my-try-require 'diminish)
;; (diminish 'wrap-region-mode)
;; (diminish 'yas-minor-mode)
(diminish 'projectile-mode)
;; (diminish 'undo-tree-mode)
(diminish 'abbrev-mode)
(diminish 'helm-mode)
;; (diminish 'auto-complete-mode)
(diminish 'eldoc-mode)
)
;;
;; IMPORTANT! we relocated emacs *Customization* file
;; so, we need to RELOAD IT HERE...
;;
(load custom-file)
;; (my-setup-font-for-mbcs)
;; (progn
;; (message "modifying frame...")
;; (let ((new-config
;; (cond
;; ((or win32p unixp)
;; '((top . 0) (left . 0) (width . 180) (height . 62)))
;; (macp
;; '((top . 10) (left . 10) (width . 150) (height . 46)))
;; )))
;; (my-modify-alist-with-alist 'default-frame-alist new-config)
;; )
;; (setq initial-frame-alist default-frame-alist)
;; (modify-all-frames-parameters default-frame-alist)
;; )