diff options
Diffstat (limited to 'early-init.el')
-rw-r--r-- | early-init.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/early-init.el b/early-init.el index bc4ccdd..6f6a848 100644 --- a/early-init.el +++ b/early-init.el | |||
@@ -30,9 +30,9 @@ restore that." | |||
30 | (+set-during-startup 'gc-cons-threshold most-positive-fixnum) | 30 | (+set-during-startup 'gc-cons-threshold most-positive-fixnum) |
31 | 31 | ||
32 | (add-hook 'minibuffer-setup-hook (defun garbage-collect@minibuffer-enter () | 32 | (add-hook 'minibuffer-setup-hook (defun garbage-collect@minibuffer-enter () |
33 | (setq gc-cons-threshold most-positive-fixnum))) | 33 | (setf gc-cons-threshold most-positive-fixnum))) |
34 | (add-hook 'minibuffer-exit-hook (defun garbage-collect@minibuffer-exit () | 34 | (add-hook 'minibuffer-exit-hook (defun garbage-collect@minibuffer-exit () |
35 | (setq gc-cons-threshold 800000))) | 35 | (setf gc-cons-threshold 800000))) |
36 | 36 | ||
37 | ;; Don't prematurely re-display | 37 | ;; Don't prematurely re-display |
38 | (unless debug-on-error | 38 | (unless debug-on-error |
@@ -45,7 +45,7 @@ restore that." | |||
45 | 45 | ||
46 | ;;; Default frame settings | 46 | ;;; Default frame settings |
47 | 47 | ||
48 | (setq default-frame-alist '((tool-bar-lines . 0) | 48 | (setf default-frame-alist '((tool-bar-lines . 0) |
49 | (menu-bar-lines . 0) | 49 | (menu-bar-lines . 0) |
50 | (vertical-scroll-bars) | 50 | (vertical-scroll-bars) |
51 | (horizontal-scroll-bars)) | 51 | (horizontal-scroll-bars)) |
@@ -73,15 +73,16 @@ See `no-littering' for examples.") | |||
73 | 73 | ||
74 | ;;; Packages | 74 | ;;; Packages |
75 | 75 | ||
76 | (setq package-enable-at-startup nil | 76 | (setf package-enable-at-startup nil |
77 | package-quickstart nil) | 77 | package-quickstart nil) |
78 | 78 | ||
79 | (require 'yoke) | 79 | (require 'yoke) |
80 | (add-hook 'emacs-lisp-mode-hook #'yoke-imenu-insinuate) | ||
80 | 81 | ||
81 | (yoke compat "https://git.sr.ht/~pkal/compat") | 82 | (yoke compat "https://git.sr.ht/~pkal/compat") |
82 | 83 | ||
83 | (yoke no-littering "https://github.com/emacscollective/no-littering" | 84 | (yoke no-littering "https://github.com/emacscollective/no-littering" |
84 | (setq no-littering-etc-directory .etc | 85 | (setf no-littering-etc-directory .etc |
85 | no-littering-var-directory .etc | 86 | no-littering-var-directory .etc |
86 | custom-file (.etc "custom.el")) | 87 | custom-file (.etc "custom.el")) |
87 | (require 'no-littering) | 88 | (require 'no-littering) |