tec/emacs-config
tec
/
emacs-config
1
0
Fork 0
Code Issues 4 Pull Requests Releases Activity

Improve missing font detection

This commit is contained in:
TEC 2023-11-09 02:02:25 +08:00
parent 6f8948a46b
commit 7032105ae2
Signed by: tec
SSH Key Fingerprint: SHA256:eobz41Mnm0/iYWBvWThftS0ElEs1ftBr6jamutnXc/A
1 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
config.org
View File

@ -1983,18 +1983,20 @@ affairs on statup.
(add-hook! 'doom-init-ui-hook
(run-at-time nil nil
(lambda ()
(message "%s missing the following fonts: %s"
(propertize "Warning!" 'face '(bold warning))
(mapconcat (lambda (font)
(propertize font 'face 'font-lock-variable-name-face))
',missing-fonts
", "))
(let (required-fonts available-fonts missing-fonts)
<<detect-missing-fonts>>
(message "%s missing the following fonts: %s"
(propertize "Warning!" 'face '(bold warning))
(mapconcat (lambda (font)
(propertize font 'face 'font-lock-variable-name-face))
',missing-fonts
", ")))
(sleep-for 0.5))))))
";; No missing fonts detected")
#+end_src
#+begin_src emacs-lisp :noweb no-export
<<detect-missing-fonts()>>
<<warn-missing-fonts()>>
#+end_src
This way whenever fonts are missing, after Doom's UI has initialised, a warning