-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathinit.el
83 lines (70 loc) · 2.33 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
;; set folder names
;;-----------------
(setq home (file-name-as-directory "~"))
(setq emacs_d (file-name-as-directory ".emacs.d"))
(setq root (concat home emacs_d))
(setq conf (file-name-as-directory "conf"))
(setq snippet (file-name-as-directory "snippets"))
(setq package (file-name-as-directory "package"))
(setq apparence (file-name-as-directory "apparence"))
(setq behavior (file-name-as-directory "behavior"))
(setq python (file-name-as-directory "python"))
(setq markdown (file-name-as-directory "markdown"))
(setq csv (file-name-as-directory "csv"))
(setq org (file-name-as-directory "org"))
(setq magit (file-name-as-directory "magit"))
(setq dired (file-name-as-directory "dired"))
(setq beancount (file-name-as-directory "beancount"))
(setq spelling (file-name-as-directory "spelling"))
;; Straight
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
(bootstrap-version 5))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
;; package
;;--------
(setq path_package_conf (concat root conf package "package_conf.el"))
(load path_package_conf)
;; apparence
;;----------
(setq path_apparence_conf (concat root conf apparence "apparence_conf.el"))
(load path_apparence_conf)
;; python
;;-------
(setq path_python_conf (concat root conf python "python_conf.el"))
(load path_python_conf)
;; org
;;-------
(setq path_org_conf (concat root conf org "org_conf.el"))
(load path_org_conf)
;; magit
;;-------
(setq path_magit_conf (concat root conf magit "magit_conf.el"))
(load path_magit_conf)
;; csv
;;----
(setq path_csv_conf (concat root conf csv "csv_conf.el"))
(load path_csv_conf)
;; beancount
;;----
(setq path_beancount_conf (concat root conf beancount "beancount_conf.el"))
(load path_beancount_conf)
;; behavior
;;---------
(setq path_behavior_conf (concat root conf behavior "behavior_conf.el"))
(load path_behavior_conf)
;; behavior
;;---------
(setq path_spelling_conf (concat root conf spelling "spelling_conf.el"))
(load path_spelling_conf)
;;------------
;; end of init
;;------------