diff options
Diffstat (limited to 'early-init.el')
-rw-r--r-- | early-init.el | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/early-init.el b/early-init.el index 77a9ecf..02f92c2 100644 --- a/early-init.el +++ b/early-init.el | |||
@@ -55,22 +55,22 @@ See `no-littering' for examples.") | |||
55 | ;;; Default frame settings | 55 | ;;; Default frame settings |
56 | 56 | ||
57 | (setq default-frame-alist '((tool-bar-lines . 0) | 57 | (setq default-frame-alist '((tool-bar-lines . 0) |
58 | (menu-bar-lines . 0) | 58 | (menu-bar-lines . 0) |
59 | (vertical-scroll-bars) | 59 | (vertical-scroll-bars) |
60 | (horizontal-scroll-bars)) | 60 | (horizontal-scroll-bars)) |
61 | frame-inhibit-implied-resize t | 61 | frame-inhibit-implied-resize t |
62 | frame-resize-pixelwise t | 62 | frame-resize-pixelwise t |
63 | window-resize-pixelwise t | 63 | window-resize-pixelwise t |
64 | inhibit-x-resources t | 64 | inhibit-x-resources t |
65 | indicate-empty-lines nil | 65 | indicate-empty-lines nil |
66 | indicate-buffer-boundaries '((top . right) | 66 | indicate-buffer-boundaries '((top . right) |
67 | (bottom . right))) | 67 | (bottom . right))) |
68 | 68 | ||
69 | ;; Fonts | 69 | ;; Fonts |
70 | 70 | ||
71 | (let ((font-name "Go Mono") | 71 | (let ((font-name "DejaVu Sans Mono") |
72 | (font-size 105) | 72 | (font-size 105) |
73 | (variable-font-name "Go") | 73 | (variable-font-name "DejaVu Sans") |
74 | (variable-font-size 1.0)) | 74 | (variable-font-size 1.0)) |
75 | (set-face-attribute 'default nil :family font-name | 75 | (set-face-attribute 'default nil :family font-name |
76 | :height font-size :weight 'book) | 76 | :height font-size :weight 'book) |
@@ -84,9 +84,9 @@ See `no-littering' for examples.") | |||
84 | (setq package-enable-at-startup nil | 84 | (setq package-enable-at-startup nil |
85 | package-quickstart nil | 85 | package-quickstart nil |
86 | straight-host-usernames '((github . "duckwork") | 86 | straight-host-usernames '((github . "duckwork") |
87 | (gitlab . "acdw")) | 87 | (gitlab . "acdw")) |
88 | straight-check-for-modifications '(check-on-save | 88 | straight-check-for-modifications '(check-on-save |
89 | find-when-checking)) | 89 | find-when-checking)) |
90 | 90 | ||
91 | (setq no-littering-etc-directory .etc | 91 | (setq no-littering-etc-directory .etc |
92 | no-littering-var-directory .etc | 92 | no-littering-var-directory .etc |
@@ -117,17 +117,17 @@ See `no-littering' for examples.") | |||
117 | (require 'straight-x) | 117 | (require 'straight-x) |
118 | 118 | ||
119 | (dolist (pkg '(el-patch | 119 | (dolist (pkg '(el-patch |
120 | no-littering | 120 | no-littering |
121 | setup)) | 121 | setup)) |
122 | (straight-use-package pkg) | 122 | (straight-use-package pkg) |
123 | (require pkg) | 123 | (require pkg) |
124 | (require (intern (format "+%s" pkg)) nil :noerror)) | 124 | (require (intern (format "+%s" pkg)) nil :noerror)) |
125 | 125 | ||
126 | ;;; Appendix | 126 | ;; Setup `setup' |
127 | |||
128 | (add-to-list 'setup-modifier-list 'setup-wrap-to-demote-errors) | ||
127 | 129 | ||
128 | ;; I've patched setup to look at `setup-ensure-function-inhibit' to decide | 130 | ;;; Appendix |
129 | ;; whether to ensure functions or not with local macros. | ||
130 | (setq setup-ensure-function-inhibit t) | ||
131 | 131 | ||
132 | ;; Get rid of a dumb alias. straight-ಠ_ಠ-mode really slows down all | 132 | ;; Get rid of a dumb alias. straight-ಠ_ಠ-mode really slows down all |
133 | ;; minibuffer completion functions. Since it's a (rarely-used, even) | 133 | ;; minibuffer completion functions. Since it's a (rarely-used, even) |