blob: d91ea33624cd1e019ab92f7fa82e8b06a3df4b4d (
plain)
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
|
;; Emacs!!!
(package-initialize)
(when (version<= emacs-version "24")
(error "This is made form Emacs >=24"))
(defconst emacs-start-time (current-time))
(add-to-list 'load-path (expand-file-name "~/.emacs.d/lisp/" user-emacs-directory))
;;; Raise garbage collection threshold after init
(add-hook 'after-init-hook
(lambda () (setq gc-cons-threshold local/gc-cons-threshold)))
;;; Custom variables
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
;;; Custom settings
(setq settings-file (expand-file-name "settings.el" user-emacs-directory))
;;; Loads settings file
(when (file-exists-p custom-file)
(load settings-file))
;;;------------------------------
;;; Features
;;;------------------------------
(require 'init-elpa)
;; theme
(require 'init-theme)
;; Utils
(require 'init-utils)
;; GUI
(require 'init-nlinum)
(require 'init-gui)
(require 'init-editing-utils)
(require 'init-modeline)
;;
;; Languages
;;; Loads custom file
(when (file-exists-p custom-file)
(load custom-file))
(when window-system
(let ((elapsed (float-time (time-subtract (current-time)
emacs-start-time))))
(message "[STARTUP] Loading %s ... done (%.3fs)" load-file-name elapsed)))
(provide 'init)
|
