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

tweak: suppress redisplays cause by site-lisp at startup

Browse source
This commit is contained in:
Henrik Lissner 2021-12-12 22:26:16 +01:00
parent f458f97760
commit 55c1cac43f
1 changed files with 14 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

16
early-init.el
View file

@ -41,8 +41,8 @@
old-file-name-handler-alist))))
(add-hook 'emacs-startup-hook #'doom-reset-file-handler-alist-h 101))
;; Emacs really shouldn't be displaying anything until it has fully started
;; up. This saves a bit of time.
;; Premature redisplays can substantially affect startup times and produce
;; ugly flashes of unstyled Emacs.
(setq-default inhibit-redisplay t
inhibit-message t)
(add-hook 'window-setup-hook
@ -63,6 +63,18 @@
(define-advice startup--load-user-init-file (:before (&rest _) init-doom)
(advice-remove #'load-file #'load-file@silence)))
;; Site files tend to use `load-file', which emits "Loading X..." messages in
;; the echo area, which in turn triggers a redisplay. Redisplays can have a
;; substantial effect on startup times and in this case, happens so early that
;; Emacs may jarringly flash white while starting up.
(define-advice load-file (:override (file) silence)
(load file nil 'nomessage))
;; ...Then undo our `load-file' advice above, to limit the scope of any edge
;; cases it may introduce down the road.
(define-advice startup--load-user-init-file (:before (&rest _) init-doom)
(advice-remove #'load-file #'load-file@silence))
;;
;;; Bootstrap