summary refs log tree commit diff stats
path: root/early-init.el
diff options
context:
space:
mode:
authorCase Duckworth2022-01-14 17:20:23 -0600
committerCase Duckworth2022-01-14 17:20:23 -0600
commit4b2e57e396314e63d70558e0aa5ad32c1cf87532 (patch)
treebcd7ccb4c2fac92f7b93702e2c9ec5fa21e4a068 /early-init.el
parentMerge branch 'main' of https://tildegit.org/acdw/emacs (diff)
downloademacs-4b2e57e396314e63d70558e0aa5ad32c1cf87532.tar.gz
emacs-4b2e57e396314e63d70558e0aa5ad32c1cf87532.zip
David Bowie
Diffstat (limited to 'early-init.el')
-rw-r--r--early-init.el31
1 files changed, 17 insertions, 14 deletions
diff --git a/early-init.el b/early-init.el index 5a29885..c87f2df 100644 --- a/early-init.el +++ b/early-init.el
@@ -90,20 +90,23 @@ See `no-littering' for examples.")
90 :height variable-font-size))) 90 :height variable-font-size)))
91 91
92 ;; Emoji fonts 92 ;; Emoji fonts
93 (+with-message "Adding emoji fonts" 93 (+ensure-after-init
94 (let ((ffl (font-family-list))) 94 (lambda ()
95 (dolist (font '("Noto Color Emoji" 95 (+with-message "Adding emoji fonts"
96 "Noto Emoji" 96 (let ((ffl (font-family-list)))
97 "Segoe UI Emoji" 97 (dolist (font '("Noto Color Emoji"
98 "Apple Color Emoji" 98 "Noto Emoji"
99 "FreeSans" 99 "Segoe UI Emoji"
100 "FreeMono" 100 "Apple Color Emoji"
101 "FreeSerif" 101 "FreeSans"
102 "Unifont" 102 "FreeMono"
103 "Symbola")) 103 "FreeSerif"
104 (when (member font ffl) 104 "Unifont"
105 (message "Found font: %s" font) 105 "Symbola"))
106 (set-fontset-font t 'symbol (font-spec :family font) nil :append)))))) 106 (when (member font ffl)
107 (message "Found font: %s" font)
108 (set-fontset-font t 'symbol
109 (font-spec :family font) nil :append))))))))
107 110
108;;; Packages 111;;; Packages
109 112