Refactor doom init process
- Refactors doom-initialize - Moves doom-initialize-modules call to init.el, to more easily isolate it during unit testing.
This commit is contained in:
parent
465122320d
commit
8ac1e1a781
7 changed files with 53 additions and 48 deletions
11
bin/doom
11
bin/doom
|
@ -79,9 +79,12 @@
|
|||
(error "%s does not exist" emacs-dir))
|
||||
|
||||
;; Bootstrap Doom
|
||||
(load (expand-file-name "init" emacs-dir)
|
||||
(load (expand-file-name "core/core.el" emacs-dir)
|
||||
nil 'nomessage)
|
||||
|
||||
(doom-initialize 'force-p)
|
||||
(doom-initialize-modules)
|
||||
|
||||
(cond ((not noninteractive)
|
||||
(doom-run-all-startup-hooks-h))
|
||||
((and (not (cdr args))
|
||||
|
@ -90,9 +93,9 @@
|
|||
((not args)
|
||||
(print! (error "No command detected.\n"))
|
||||
(usage))
|
||||
((let ((default-directory emacs-dir))
|
||||
(setq argv nil
|
||||
noninteractive 'doom)
|
||||
((require 'core-cli)
|
||||
(let ((default-directory emacs-dir))
|
||||
(setq argv nil)
|
||||
(condition-case e
|
||||
(doom-dispatch (car args) (cdr args))
|
||||
(user-error
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue