acdw/emacs
acdw
/
emacs
1
2
Fork 0
Code Issues 4 Pull Requests Releases Activity

Change fonts

This commit is contained in:
Case Duckworth 2021-09-23 17:10:56 -05:00
parent 10b8c20978
commit 95abd1a389
1 changed files with 21 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
early-init.el
View File

@ -82,22 +82,33 @@ say, `tool-bar-mode' once to toggle the tool bar back on."
(defun after-make-frame@setup (&rest args) (defun after-make-frame@setup (&rest args)
(ignore args) (ignore args)
(let ((monospace-faces (let ((monospace-faces
(acdw/system ;; (acdw/system
(:work '((:font "Consolas" :height 110) ;; (:work '((:font "Consolas" :height 110)
(:font "DejaVu Sans Mono" :height 110) ;; (:font "DejaVu Sans Mono" :height 110)
(:font "monospace" :height 110))) ;; (:font "monospace" :height 110)))
(_ '((:font "DejaVu Sans Mono" :height 100) ;; (_ '((:font "DejaVu Sans Mono" :height 100)
(:font "Consolas" :height 100) ;; (:font "Consolas" :height 100)
(:font "monospace" :height 100)))))) ;; (:font "monospace" :height 100))))
'((:font "Fantasque Sans Mono" :height 110)
(:font "Go Mono" :height 100)
(:font "DejaVu Sans Mono" :height 110)
(:font "monospace" :height 100))))
(acdw/set-first-face-attribute 'default monospace-faces) (acdw/set-first-face-attribute 'default monospace-faces)
(acdw/set-first-face-attribute 'fixed-pitch monospace-faces) (acdw/set-first-face-attribute 'fixed-pitch monospace-faces)
(acdw/set-first-face-attribute 'variable-pitch (acdw/set-first-face-attribute 'variable-pitch
'((:font "Inter" :height 120) '((:font "Comic Neue" :height 125)
(:font "Inter" :height 120)
(:font "Go" :height 120)
(:font "sans-serif" (:font "sans-serif"
:height 100)))) :height 100))))
(acdw/set-emoji-fonts "Segoe UI Emoji" (acdw/set-emoji-fonts "Noto Color Emoji"
"Noto Color Emoji" "Noto Emoji"
"Segoe UI Emoji"
"Apple Color Emoji" "Apple Color Emoji"
"FreeSans"
"FreeMono"
"FreeSerif"
"Unifont"
"Symbola") "Symbola")
(acdw/set-fringes '((left-curly-arrow [#b01100000 (acdw/set-fringes '((left-curly-arrow [#b01100000
#b00110000 #b00110000