diff options
| author | Alan Pearce | 2017-05-15 14:26:54 +0200 |
|---|---|---|
| committer | Alan Pearce | 2017-05-15 14:26:54 +0200 |
| commit | d9619a25b276c5aff47b70c15cf2942fa2b9313b (patch) | |
| tree | 6d3cbdf01ca6998c5f4470a654579f27d8f7164b | |
| parent | e29baf020212cff526820efef6582c671b1e01f5 (diff) | |
| download | dotfiles-d9619a25b276c5aff47b70c15cf2942fa2b9313b.tar.lz dotfiles-d9619a25b276c5aff47b70c15cf2942fa2b9313b.tar.zst dotfiles-d9619a25b276c5aff47b70c15cf2942fa2b9313b.zip | |
Emacs: Change macOS fonts across emacs-mac and normal emacs
| -rw-r--r-- | emacs/.emacs.d/init.org | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org index 0de6a18..373ab26 100644 --- a/emacs/.emacs.d/init.org +++ b/emacs/.emacs.d/init.org @@ -215,11 +215,12 @@ because I manage those in my [[file:~/projects/dotfiles/tag-xresources/xresource (cond ((eq window-system 'w32) (ap/set-fonts "Liberation Mono" 11 "Segoe UI" 11 t)) - ((eq window-system 'ns) + ((or (eq window-system 'mac) + (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 "Lekton" 20 "Lucida Grande" 16 t) - (ap/set-fonts "Monaco" 14 "Lucida Grande" 14 nil 0.1)))) + (ap/set-fonts "Monaco" 16 "Lucida Grande" 16 t 0.2) + (ap/set-fonts "Monoid" 12 "Helvetica Neue" 12 t 0.1)))) ((eq window-system 'x) (set-fontset-font "fontset-default" 'unicode (font-spec :name "Terminus" :size 14)) (ap/set-fonts "Fixed" 14 "Lucida" 14 nil)))) |