diff options
author | Case Duckworth | 2022-02-16 23:05:47 -0600 |
---|---|---|
committer | Case Duckworth | 2022-02-16 23:05:47 -0600 |
commit | 5738c05f5bb51edf4780894d2c3819a07fc5fc1f (patch) | |
tree | 9fa4404c510c8f9a6d77bb395269b2aa100ba9d6 | |
parent | Write +{forward,backward}-paragraph (diff) | |
download | emacs-5738c05f5bb51edf4780894d2c3819a07fc5fc1f.tar.gz emacs-5738c05f5bb51edf4780894d2c3819a07fc5fc1f.zip |
Fix fonts
-rw-r--r-- | machines/bob.el | 30 |
1 files changed, 23 insertions, 7 deletions
diff --git a/machines/bob.el b/machines/bob.el index e9cb8ec..ff358cf 100644 --- a/machines/bob.el +++ b/machines/bob.el | |||
@@ -6,15 +6,31 @@ | |||
6 | 6 | ||
7 | (require 'acdw) | 7 | (require 'acdw) |
8 | 8 | ||
9 | ;; [[https://twitter.com/NPRougier/status/1488570192561160195][from Nic Rougier]] | 9 | ;; Other ideas: [[https://twitter.com/NPRougier/status/1488570192561160195][from Nic Rougier]] |
10 | (add-function :after machine-after-load-theme | 10 | (add-function :after machine-after-load-theme |
11 | (defun +bob-set-faces (&rest _) | 11 | (defun +bob-set-faces (&rest _) |
12 | (let ((mono-face "Roboto Mono")) | 12 | (let ((base-face "Monego") |
13 | (italic-face "Victor Mono") | ||
14 | ;; (bold-face nil) | ||
15 | (mono-face nil) | ||
16 | (var-face "Lato") | ||
17 | (base-size 110)) | ||
13 | (+set-faces | 18 | (+set-faces |
14 | `((default :family ,mono-face :weight regular :height 110) | 19 | `((default :family ,base-face |
15 | (bold :family ,mono-face :weight medium) | 20 | :weight regular |
16 | (fixed-pitch :inherit default) | 21 | :height ,base-size) |
17 | (italic :family "Victor Mono" :weight medium :slant italic :height 1.05) | 22 | ;; (bold :family ,(or bold-face base-face) |
18 | (variable-pitch :family "Open Sans" :height 1.1)))))) | 23 | ;; :weight bold) |
24 | (italic :family ,(or italic-face base-face) | ||
25 | :weight medium | ||
26 | :slant italic | ||
27 | :height ,base-size) | ||
28 | (fixed-pitch :family ,(or mono-face base-face) | ||
29 | :weight regular | ||
30 | :height ,base-size) | ||
31 | (variable-pitch :family ,(or var-face base-face) | ||
32 | :height 1.2) | ||
33 | (org-italic :family ,(or var-face base-face) | ||
34 | :slant italic)))))) | ||
19 | 35 | ||
20 | ;;; bob.el ends here | 36 | ;;; bob.el ends here |