mirrors/doomemacs
1
Fork 0
mirror of https://github.com/doomemacs/doomemacs.git synced 2025-12-06 18:40:52 -08:00
Code Issues Projects Releases Wiki Activity

perf(unicode): drastically reduce initial startup time

Browse source 
font-utils.el disable its cache on X and Windows so every check for the
existence of a font recomputes the font list, which takes a
non-negligible amount of time, at least on X. This default is reasonable
as stated in the docstring of font-utils-use-memory-cache:

> Disabled on X11 and MS Windows by default, because font-family-list
> often gives truncated results before Emacs is fully initialized.

This is, however, unreasonable from unicode-fonts, where calls to check
the existence of fonts happens in a loop; during the loop, Emacs is not
going to suddenly become fully initialized, , so each call is
actually recomputing the same font list over and over again.

Enabling the font-utils memory cache, at least for the duration of
unicode-fonts-setup, thus drastically reduces the initial startup time,
or the startup time when the pcache store is reset for some reason.
This commit is contained in:
Kisaragi Hiu 2025-11-17 01:55:00 +09:00 • committed by Henrik Lissner
parent 139ab93fef
commit 44d7c8bf37
1 changed files with 12 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

14
modules/ui/unicode/autoload.el
View file

@ -8,6 +8,10 @@ necessary."
(setq-default bidi-display-reordering t)
(+unicode-setup-fonts-h (selected-frame))))
;; From font-utils.el, required by unicode-fonts.el.
;; This only marks the variable as special locally.
(defvar font-utils-use-memory-cache)
;;;###autoload
(defun +unicode-setup-fonts-h (&optional frame)
"Initialize `unicode-fonts', if in a GUI session.
@ -20,6 +24,12 @@ If doom-symbol-font is set, add it as a preferred font for all Unicode blocks."
(let ((doom-symbol-font-family (plist-get (font-face-attributes doom-symbol-font) :family)))
(dolist (unicode-block unicode-fonts-block-font-mapping)
(push doom-symbol-font-family (cadr unicode-block)))))
;; NOTE: will impact startup time on first run
(let (inhibit-redisplay inhibit-message)
(let ((inhibit-redisplay nil)
(inhibit-message nil)
;; font-utils says "`font-family-list' often gives truncated results
;; before Emacs is fully initialized". That is irrelevant when
;; `unicode-fonts' is testing for the existence of fonts in a loop,
;; all calls during the same phase in startup and thus would see the
;; same set of available fonts regardless of caching.
(font-utils-use-memory-cache t))
(unicode-fonts-setup)))))