change default font order

This commit is contained in:
2025-07-03 21:54:56 +02:00
parent 35dfd6ecde
commit 219e87d0ec

View File

@@ -35,22 +35,31 @@
;; 𝓐𝓑𝓒𝓓𝓔𝓕𝓖𝓗𝓘𝓙𝓚𝓛𝓜𝓝𝓞𝓟𝓠𝓡𝓢𝓣𝓤𝓥𝓦𝓧𝓨𝓩 MATHEMATICAL BOLD SCRIPT CAPITAL X
;; ✈↵#↹⏎⇤⇥␣↑↓←→ ☐☑
;; :rage::hamburger:
;; box drawing alignment tests: █
;; ▉
;; ╔══╦══╗ ┌──┬──┐ ╭──┬──╮ ╭──┬──╮ ┏━━┳━━┓ ┎┒┏┑ ╷ ╻ ┏┯┓ ┌┰┐ ▊ ╱╲╱╲╳╳╳
;; ║┌─╨─┐║ │╔═╧═╗│ │╒═╪═╕│ │╓─╁─╖│ ┃┌─╂─┐┃ ┗╃╄┙ ╶┼╴╺╋╸┠┼┨ ┝╋┥ ▋ ╲╱╲╱╳╳╳
;; ║│╲ ╱│║ │║ ║│ ││ │ ││ │║ ┃ ║│ ┃│ ╿ │┃ ┍╅╆┓ ╵ ╹ ┗┷┛ └┸┘ ▌ ╱╲╱╲╳╳╳
;; ╠╡ ╞╣ ├╢ ╟┤ ├┼─┼─┼┤ ├╫─╂─╫┤ ┣┿╾┼╼┿┫ ┕┛┖┚ ┌┄┄┐ ╎ ┏┅┅┓ ┋ ▍ ╲╱╲╱╳╳╳
;; ║│╱ ╲│║ │║ ║│ ││ │ ││ │║ ┃ ║│ ┃│ ╽ │┃ ░░▒▒▓▓██ ┊ ┆ ╎ ╏ ┇ ┋ ▎
;; ║└─╥─┘║ │╚═╤═╝│ │╘═╪═╛│ │╙─╀─╜│ ┃└─╂─┘┃ ░░▒▒▓▓██ ┊ ┆ ╎ ╏ ┇ ┋ ▏
;; ╚══╩══╝ └──┴──┘ ╰──┴──╯ ╰──┴──╯ ┗━━┻━━┛ └╌╌┘ ╎ ┗╍╍┛ ┋ ▁▂▃▄▅▆▇█
;; see M-x describe-char
;; (set-frame-font "DejaVu Sans Mono-10")
;; (set-frame-font "DejaVu Sans Mono:pixelsize=13")
;; (set-frame-font (font-spec :name "DejaVu Sans Mono" :size 13))
(cond
((find-font (font-spec :name "Source Code Pro"))
(set-frame-font (font-spec :name "Source Code Pro" :size 13)))
((find-font (font-spec :name "DejaVu Sans Mono"))
(set-frame-font (font-spec :name "DejaVu Sans Mono" :size 13)))
((find-font (font-spec :name "Noto Sans Mono")) ;; parentheses moving
(set-frame-font (font-spec :name "Noto Sans Mono" :size 13)))
((find-font (font-spec :name "Source Han Mono"))
(set-frame-font "Source Han Mono-9"))
(set-frame-font (font-spec :name "Source Han Mono" :size 12)))
((find-font (font-spec :name "inconsolata"))
(set-frame-font (font-spec :name "inconsolata" :size 16)))
((find-font (font-spec :name "Source Code Pro"))
(set-frame-font "Source Code Pro-10"))
((find-font (font-spec :name "Lucida Console"))
(set-frame-font "Lucida Console-10"))
((find-font (font-spec :name "courier")) ;; is breathing if underline is displayed dynamically