TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Better portable way to set the font config.

Browse source
This commit is contained in:
syl20bnr 2014-08-05 19:46:20 -04:00
parent cf7ebb892e
commit b2188edafd
1 changed files with 9 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
config/config-ui.el
View file

@ -24,15 +24,18 @@
(fset 'yes-or-no-p 'y-or-n-p)
;; font
;; (set-default-font "DejaVu Sans Mono-10")
(pcase system-type
(`windows-nt
(progn
(add-to-list 'default-frame-alist '(font . "Source Code Pro-9"))
(set-default-font "Source Code Pro-9")))
(`darwin
(pcase window-system
(`x (progn
(add-to-list 'default-frame-alist '(font . "Source Code Pro-10"))
(set-default-font "Source Code Pro-10")))
(`mac
(progn
(add-to-list 'default-frame-alist '(font . "Source Code Pro-12"))
(set-default-font "Source Code Pro-12")))
(`w32
(progn
(add-to-list 'default-frame-alist '(font . "Source Code Pro-9"))
(set-default-font "Source Code Pro-9")))
(other (progn
(add-to-list 'default-frame-alist '(font . "Source Code Pro-10"))
(set-default-font "Source Code Pro-10")))