summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2020-09-16 21:43:58 -0500
committerCase Duckworth2020-09-16 21:43:58 -0500
commitd09180d037ba552532593cb44d8daf36a1f99479 (patch)
treeed3fb8e438d4811e63bd0b42ed20fc8356c0101e
parentSet fonts ... better? (diff)
downloademacs-d09180d037ba552532593cb44d8daf36a1f99479.tar.gz
emacs-d09180d037ba552532593cb44d8daf36a1f99479.zip
Change fonts to dynamic-fonts
Is this a good idea?  We'll see.  Maybe I'll fork the damn thing.
-rw-r--r--init.el45
1 files changed, 20 insertions, 25 deletions
diff --git a/init.el b/init.el index fbbb0d7..afedefd 100644 --- a/init.el +++ b/init.el
@@ -10,31 +10,7 @@
10 (setq calendar-longitude -91.83) 10 (setq calendar-longitude -91.83)
11 11
12 (setq browse-url-browser-function 'browse-url-generic) 12 (setq browse-url-browser-function 'browse-url-generic)
13 (setq browse-url-generic-program "firefox") 13 (setq browse-url-generic-program "firefox"))
14
15 ;; fonts
16 (require 'cl)
17 (defun font-candidate (&rest fonts)
18 "Return existing font which matches first."
19 (find-if (lambda (f) (find-font (font-spec :name f))) fonts))
20
21 (set-face-attribute 'variable-pitch nil
22 :font (font-candidate
23 "Dejavu Sans-11"
24 "Georgia-11"
25 "Times-11"))
26
27 (set-face-attribute 'fixed-pitch nil
28 :font (font-candidate
29 "Fira Code-11"
30 "DejaVu Sans Mono-11"
31 "Courier-11"
32 "Fixed-11"))
33
34 (set-face-attribute 'default nil
35 :font (font-candidate
36 "Iosevka Term Slab-11"
37 "Consolas-11")))
38 14
39(use-package no-littering 15(use-package no-littering
40 :config 16 :config
@@ -293,6 +269,25 @@
293 269
294;;; theming and looks 270;;; theming and looks
295 271
272(use-package dynamic-fonts
273 :init
274 (setq dynamic-fonts-preferred-monospace-fonts
275 '("Iosevka Term Slab"
276 "Consolas"
277 "Fira Code"
278 "DejaVu Sans Mono"
279 "Courier"
280 "Fixed"))
281 (setq dynamic-fonts-preferred-monospace-point-size 11)
282 (setq dynamic-fonts-preferred-proportional-fonts
283 '("DejaVu Sans"
284 "Georgia"
285 "Times New Roman"
286 "Times"))
287 (setq dynamic-fonts-preferred-proportional-point-size 12)
288 :config
289 (dynamic-fonts-setup))
290
296(use-package doom-modeline 291(use-package doom-modeline
297 :init 292 :init
298 (setq doom-modeline-icon nil) 293 (setq doom-modeline-icon nil)