Emacs: Use `window-system` for all font checks
Alan Pearce alan.pearce@spotcap.com
Mon, 13 Jun 2016 11:04:37 +0200
1 files changed, 1 insertions(+), 1 deletions(-)
jump to
M tag-emacs/emacs.d/init.org → tag-emacs/emacs.d/init.org
@@ -175,7 +175,7 @@ (defun ap/set-fonts-according-to-system () (cond ((eq window-system 'w32) (ap/set-fonts "Consolas" 10 "Segoe UI" 11)) - ((eq system-type 'darwin) + ((eq window-system 'ns) (let ((displays (string-to-number (shell-command-to-string "system_profiler SPDisplaysDataType | grep \"Online: Yes\" | wc -l")))) (if (eq displays 1) (ap/set-fonts "PT Mono" 12 "Lucide Grande" 12 t)