This repository has been archived by the owner on Feb 23, 2021. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 0
/
init.el
83 lines (72 loc) · 3.65 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
;;; Init.el --- mother board
;;; Commentary:
;;; Code:
;;==================================================
;; User info
;;==================================================
(setq user-full-name "Natsume Takashi")
(setq user-mail-address "[email protected]")
;;==================================================
;; Package System
;;==================================================
(require 'package)
(setq package-enable-at-startup nil) ; Decide when to load packages by myself
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
(add-to-list 'package-archives '("org" . "http://orgmode.org/elpa/") t)
(package-initialize)
;;==================================================
;; Auto-Install/Load Package
;;==================================================
;; Bootstrap and then enable 'use-package'
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
;; make use-package no longer needed at runtime
;; reduce load time
(eval-when-compile
(require 'use-package))
;;(require 'diminish) ;; if you use :diminish
;;(require 'bind-key) ;; if you use any :bind variant
;; Confiqure 'use-package'
(setq use-package-always-ensure t) ;; package(s) to be installed automatically if not already installed (use ':ensure t' at all times)
;;==================================================
;; Load Elisp Files
;;==================================================
;; Remember, the naming of files and directories is to make me know where can I find the config of a feature even if I don't know what I used to implement this feature, and not know what to be keyword.
(defun load-directory (dir)
(let ((load-it (lambda (f)
(load-file (concat (file-name-as-directory dir) f)))
))
(mapc load-it (directory-files dir nil "\\.el$"))))
(load-directory "~/.emacs.d/my-lisp")
(load-directory "~/.emacs.d/my-lisp/BuiltIn_Feature")
(load-directory "~/.emacs.d/my-lisp/Visual_Support")
(load-directory "~/.emacs.d/my-lisp/Solo_Package_Configuration")
(load-directory "~/.emacs.d/my-lisp/Text_Object")
(load-directory "~/.emacs.d/my-lisp/Panel")
(load-directory "~/.emacs.d/my-lisp/Programming")
(load-directory "~/.emacs.d/my-lisp/Org")
;;=============================================================
;; Added by Package.el. This must come before configurations of
;; installed packages. Don't delete this line. If you don't want it,
;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(package-selected-packages
(quote
(smartparens helm-ag smartparens-config helm-projectile highlight-indent-guides elpy hide-region helm goto-last-change company-irony-c-headers company-yasnippet company-c-headers flycheck-irony company-irony company irony dumb-jump hydra sr-speedbar counsel org-download use-package swiper async avy-migemo ace-pinyin w3m xah-math-input flycheck hl-line+ switch-window yasnippet))))
;; enable narrow region command which is not by default
(put 'narrow-to-region 'disabled nil)
(provide 'Init)
;;; Init.el ends here
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(default ((t (:background nil))))
'(hl-line ((t (:background "#222" :underline nil)))))