diff options
author | Alan Pearce | 2013-10-08 21:34:00 +0100 |
---|---|---|
committer | Alan Pearce | 2013-10-08 21:34:00 +0100 |
commit | d0f58576663d1005503cb148fc63c3cdaf620501 (patch) | |
tree | 41a10d8f169550f0cc5ec894637df2ca0052d7d2 | |
parent | e3acf5d644cb1137db38e66cddbdfa87e6aa7f88 (diff) | |
download | nixfiles-d0f58576663d1005503cb148fc63c3cdaf620501.tar.lz nixfiles-d0f58576663d1005503cb148fc63c3cdaf620501.tar.zst nixfiles-d0f58576663d1005503cb148fc63c3cdaf620501.zip |
Emacs: set a variable pitch font under darwin
-rw-r--r-- | emacs/init.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/emacs/init.el b/emacs/init.el index 6844502a..12a5f53d 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -147,7 +147,10 @@ Values: `desktop', `server', `laptop'") (variable-face "Helvetica Neue") (default-font (concat mono-face "-" (number-to-string font-size)))) (when mono-face - (add-to-list 'default-frame-alist `(font . ,default-font))))))) + (add-to-list 'default-frame-alist `(font . ,default-font))) + (when variable-face + (set-face-font 'variable-pitch (concat variable-face "-" + (number-to-string (1+ font-size))))))))) (with-elapsed-timer "Setting up font styles" (let* ((font-height (face-attribute 'default :height)) |