diff options
| author | Case Duckworth | 2021-03-30 12:30:51 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-03-30 12:30:51 -0500 |
| commit | 4ba0c92df0e4d4e5406fe0fe676709b973674978 (patch) | |
| tree | 793f0d0b11a69fd46624460da248bb7e07b8a970 /init.el | |
| parent | Fix arrayp bug in `acdw-modeline/vc-branch' (diff) | |
| download | emacs-4ba0c92df0e4d4e5406fe0fe676709b973674978.tar.gz emacs-4ba0c92df0e4d4e5406fe0fe676709b973674978.zip | |
Set all fonts on all possible systems
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 14 |
1 files changed, 14 insertions, 0 deletions
| 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 |