diff --git a/early-init.el b/early-init.el index c051374..db64ecd 100644 --- a/early-init.el +++ b/early-init.el @@ -2,4 +2,14 @@ (setq package-user-dir (expand-file-name "elpa" user-emacs-directory)) +;; From https://protesilaos.com/emacs/dotemacs: temporarily increase the GC +;; threshold on startup to speed up booting. Reenable GC limits as soon as +;; Emacs is started. +(setq gc-cons-threshold most-positive-fixnum + gc-cons-percentage 0.5) + +(add-hook 'emacs-startup-hook + (lambda () + (setq gc-cons-threshold (* 100 1024 1024) ; 100mb + gc-cons-percentage 0.1))) diff --git a/init.el b/init.el index e6606b4..b5e7013 100644 --- a/init.el +++ b/init.el @@ -153,7 +153,6 @@ history-delete-duplicates t track-eol t garbage-collection-messages nil - gc-cons-threshold (* 100 1024 1024) ; 100mb read-process-output-max (* 1024 1024) ; 1mb next-error-message-highlight t help-enable-symbol-autoload t