emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

tweak: load site-lisp verbosely in debug mode

Browse source
This commit is contained in:
Henrik Lissner 2024-09-11 13:58:01 -04:00
parent 546e56f1fa
commit 6d7a39c482
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/doom.el
View file

@ -519,10 +519,11 @@ users).")
(progn (progn
(when (setq site-run-file (get 'site-run-file 'initial-value)) (when (setq site-run-file (get 'site-run-file 'initial-value))
(let ((inhibit-startup-screen inhibit-startup-screen)) (let ((inhibit-startup-screen inhibit-startup-screen))
(letf! ((defun load-file (file) (load file nil 'nomessage)) (letf! ((defun load-file (file)
(load file nil (not init-file-debug)))
(defun load (file &optional noerror _nomessage &rest args) (defun load (file &optional noerror _nomessage &rest args)
(apply load file noerror t args))) (apply load file noerror (not init-file-debug) args)))
(load site-run-file t t)))) (load site-run-file t))))
(apply fn args)) (apply fn args))
;; Now it's safe to be verbose. ;; Now it's safe to be verbose.
(setq-default inhibit-message nil) (setq-default inhibit-message nil)