diff options
-rw-r--r-- | early-init.el | 3 | ||||
-rw-r--r-- | init.el | 14 |
2 files changed, 16 insertions, 1 deletions
diff --git a/early-init.el b/early-init.el index adc876a..2a6e068 100644 --- a/early-init.el +++ b/early-init.el | |||
@@ -57,7 +57,8 @@ | |||
57 | (right-fringe . 8) ; (8 is default) | 57 | (right-fringe . 8) ; (8 is default) |
58 | (font . ,(pcase acdw/system | 58 | (font . ,(pcase acdw/system |
59 | (:home "DejaVu Sans Mono 10") | 59 | (:home "DejaVu Sans Mono 10") |
60 | (:work "Consolas 10")))) | 60 | (:work "Consolas 10") |
61 | (:other "monospace 10")))) | ||
61 | frame-inhibit-implied-resize t ; Don't resize randomly | 62 | frame-inhibit-implied-resize t ; Don't resize randomly |
62 | frame-resize-pixelwise t ; Resize by pixels, not chars | 63 | frame-resize-pixelwise t ; Resize by pixels, not chars |
63 | ) | 64 | ) |
diff --git a/init.el b/init.el index b2236a1..f7db5e0 100644 --- a/init.el +++ b/init.el | |||
@@ -221,6 +221,20 @@ | |||
221 | scroll-conservatively 101 | 221 | scroll-conservatively 101 |
222 | scroll-preserve-screen-position 1) | 222 | scroll-preserve-screen-position 1) |
223 | 223 | ||
224 | ;; Fonts | ||
225 | (set-face-attribute 'default nil | ||
226 | :font (pcase acdw/system | ||
227 | (:home "DejaVu Sans Mono-10") | ||
228 | (:work "Consolas-10") | ||
229 | (:other "monospace-10"))) | ||
230 | (set-face-attribute 'fixed-pitch nil | ||
231 | :inherit 'default) | ||
232 | (set-face-attribute 'variable-pitch nil | ||
233 | :font (pcase acdw/system | ||
234 | (:home "DejaVu Sans") | ||
235 | (:work "Calibri-11") | ||
236 | (:other "sans-serif"))) | ||
237 | |||
224 | ;; MS Windows | 238 | ;; MS Windows |
225 | (setc w32-allow-system-shell t | 239 | (setc w32-allow-system-shell t |
226 | w32-pass-lwindow-to-system nil | 240 | w32-pass-lwindow-to-system nil |