2019-02-08 21:14:49 -05:00
|
|
|
;; Needs to be commented or else it will be added back
|
|
|
|
|
; (package-initialize)
|
2018-10-15 18:28:02 -04:00
|
|
|
|
2019-02-10 14:09:23 -05:00
|
|
|
(defvar jf-config-file (expand-file-name "config.org" user-emacs-directory))
|
2019-02-10 11:52:14 -05:00
|
|
|
(defvar jf-init-file (expand-file-name "init.el" user-emacs-directory))
|
|
|
|
|
(defvar jf-load-path (expand-file-name "lisp/" user-emacs-directory))
|
2019-02-10 14:34:50 -05:00
|
|
|
(defvar jf-gc-threshold 20000000) ; 20MB up from 800KB
|
2019-02-10 11:52:14 -05:00
|
|
|
|
2019-02-10 14:34:50 -05:00
|
|
|
(defun jf-inhibit-gc ()
|
|
|
|
|
(setq gc-cons-threshold most-positive-fixnum))
|
|
|
|
|
(defun jf-resume-gc ()
|
|
|
|
|
(setq gc-cons-threshold jf-gc-threshold))
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(message "-> Initializing Electronic Macs...")
|
|
|
|
|
|
|
|
|
|
;; Don't garbage collect during init
|
|
|
|
|
(jf-inhibit-gc)
|
2019-02-10 11:52:14 -05:00
|
|
|
(org-babel-load-file jf-config-file)
|
2019-02-10 14:34:50 -05:00
|
|
|
(jf-resume-gc)
|
|
|
|
|
|
|
|
|
|
(message "-> Initialized in %s" (emacs-init-time))
|
