summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2013-10-08 21:34:00 +0100
committerAlan Pearce2013-10-08 21:34:00 +0100
commitd0f58576663d1005503cb148fc63c3cdaf620501 (patch)
tree41a10d8f169550f0cc5ec894637df2ca0052d7d2
parente3acf5d644cb1137db38e66cddbdfa87e6aa7f88 (diff)
downloaddotfiles-d0f58576663d1005503cb148fc63c3cdaf620501.tar.lz
dotfiles-d0f58576663d1005503cb148fc63c3cdaf620501.tar.zst
dotfiles-d0f58576663d1005503cb148fc63c3cdaf620501.zip
Emacs: set a variable pitch font under darwin
-rw-r--r--emacs/init.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/emacs/init.el b/emacs/init.el
index 6844502..12a5f53 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))