summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el12
1 files changed, 7 insertions, 5 deletions
diff --git a/init.el b/init.el index 6296242..418cc9a 100644 --- a/init.el +++ b/init.el
@@ -370,11 +370,13 @@
370;; modi/font-check 370;; modi/font-check
371(defun acdw/setup-fonts () 371(defun acdw/setup-fonts ()
372 (let* ((fixed-pitch-sans-serif-family 372 (let* ((fixed-pitch-sans-serif-family
373 (cond ((x-list-fonts "Fira Code") '(:family "Fira Code")) 373 (cond
374 ((x-list-fonts "Consolas") '(:family "Consolas")) 374 ((x-list-fonts "Fantasque Sans Mono") '(:family "Fantasque Sans Mono" :size 12))
375 ((x-list-fonts "DejaVu Sans Mono") '(:family "DejaVu Sans Mono")) 375 ((x-list-fonts "Fira Code") '(:family "Fira Code"))
376 ((x-list-fonts "Fixed") '(:family "Fixed")) 376 ((x-list-fonts "Consolas") '(:family "Consolas"))
377 (nil (warn "Can't find a good fixed pitch sans-serif font.")))) 377 ((x-list-fonts "DejaVu Sans Mono") '(:family "DejaVu Sans Mono"))
378 ((x-list-fonts "Fixed") '(:family "Fixed"))
379 (nil (warn "Can't find a good fixed pitch sans-serif font."))))
378 (fixed-pitch-serif-family 380 (fixed-pitch-serif-family
379 (cond ((x-list-fonts "Go Mono") '(:family "Go Mono")) 381 (cond ((x-list-fonts "Go Mono") '(:family "Go Mono"))
380 ((x-list-fonts "Courier Prime") '(:family "Courier Prime")) 382 ((x-list-fonts "Courier Prime") '(:family "Courier Prime"))