about summary refs log tree commit diff stats
path: root/early-init.el
diff options
context:
space:
mode:
authorCase Duckworth2021-09-23 17:10:56 -0500
committerCase Duckworth2021-09-23 17:10:56 -0500
commit95abd1a389a243aac3635015de333d1e8abd6b1a (patch)
treef5cdb535fc047de5a3366a409cf48bf10577a7e2 /early-init.el
parentAdd circe-command-SHORTEN (diff)
downloademacs-95abd1a389a243aac3635015de333d1e8abd6b1a.tar.gz
emacs-95abd1a389a243aac3635015de333d1e8abd6b1a.zip
Change fonts
Diffstat (limited to 'early-init.el')
-rw-r--r--early-init.el31
1 files changed, 21 insertions, 10 deletions
diff --git a/early-init.el b/early-init.el index b020c52..c569cc5 100644 --- a/early-init.el +++ b/early-init.el
@@ -82,22 +82,33 @@ say, `tool-bar-mode' once to toggle the tool bar back on."
82 (defun after-make-frame@setup (&rest args) 82 (defun after-make-frame@setup (&rest args)
83 (ignore args) 83 (ignore args)
84 (let ((monospace-faces 84 (let ((monospace-faces
85 (acdw/system 85 ;; (acdw/system
86 (:work '((:font "Consolas" :height 110) 86 ;; (:work '((:font "Consolas" :height 110)
87 (:font "DejaVu Sans Mono" :height 110) 87 ;; (:font "DejaVu Sans Mono" :height 110)
88 (:font "monospace" :height 110))) 88 ;; (:font "monospace" :height 110)))
89 (_ '((:font "DejaVu Sans Mono" :height 100) 89 ;; (_ '((:font "DejaVu Sans Mono" :height 100)
90 (:font "Consolas" :height 100) 90 ;; (:font "Consolas" :height 100)
91 (:font "monospace" :height 100)))))) 91 ;; (:font "monospace" :height 100))))
92 '((:font "Fantasque Sans Mono" :height 110)
93 (:font "Go Mono" :height 100)
94 (:font "DejaVu Sans Mono" :height 110)
95 (:font "monospace" :height 100))))
92 (acdw/set-first-face-attribute 'default monospace-faces) 96 (acdw/set-first-face-attribute 'default monospace-faces)
93 (acdw/set-first-face-attribute 'fixed-pitch monospace-faces) 97 (acdw/set-first-face-attribute 'fixed-pitch monospace-faces)
94 (acdw/set-first-face-attribute 'variable-pitch 98 (acdw/set-first-face-attribute 'variable-pitch
95 '((:font "Inter" :height 120) 99 '((:font "Comic Neue" :height 125)
100 (:font "Inter" :height 120)
101 (:font "Go" :height 120)
96 (:font "sans-serif" 102 (:font "sans-serif"
97 :height 100)))) 103 :height 100))))
98 (acdw/set-emoji-fonts "Segoe UI Emoji" 104 (acdw/set-emoji-fonts "Noto Color Emoji"
99 "Noto Color Emoji" 105 "Noto Emoji"
106 "Segoe UI Emoji"
100 "Apple Color Emoji" 107 "Apple Color Emoji"
108 "FreeSans"
109 "FreeMono"
110 "FreeSerif"
111 "Unifont"
101 "Symbola") 112 "Symbola")
102 (acdw/set-fringes '((left-curly-arrow [#b01100000 113 (acdw/set-fringes '((left-curly-arrow [#b01100000
103 #b00110000 114 #b00110000