summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2020-09-16 21:35:33 -0500
committerCase Duckworth2020-09-16 21:35:33 -0500
commit849e805ad2b1f5043ec585363bd1890cb04cb378 (patch)
treeb9a8ec1cb5b1b8ccc8b162d90b0dfda031cfbd2a
parentAllow recursive minibuffers (diff)
downloademacs-849e805ad2b1f5043ec585363bd1890cb04cb378.tar.gz
emacs-849e805ad2b1f5043ec585363bd1890cb04cb378.zip
Set fonts ... better?
-rw-r--r--init.el26
1 files changed, 24 insertions, 2 deletions
diff --git a/init.el b/init.el index ede4118..fbbb0d7 100644 --- a/init.el +++ b/init.el
@@ -12,8 +12,29 @@
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 14
15 :custom-face 15 ;; fonts
16 (default ((t (:family "Iosevka Term Slab" :height 110))))) 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")))
17 38
18(use-package no-littering 39(use-package no-littering
19 :config 40 :config
@@ -107,6 +128,7 @@
107 ([remap split-window-right] . split-and-follow-right) 128 ([remap split-window-right] . split-and-follow-right)
108 129
109 :hook 130 :hook
131 (prog-mode-hook . prettify-symbols-mode)
110 (auto-save-hook . full-auto-save) 132 (auto-save-hook . full-auto-save)
111 (focus-out-hook . full-auto-save) 133 (focus-out-hook . full-auto-save)
112 (before-save-hook . delete-trailing-whitespace)) 134 (before-save-hook . delete-trailing-whitespace))