Revert GC threshold after startup

2 files changed, 3 insertions, 0 deletions

diff --git a/early-init.el b/early-init.el
index 8bd3ddb..9782b87 100644
--- a/early-init.el
+++ b/early-init.el
@@ -16,6 +16,7 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 ;; Startup speed, annoyance suppression
+(setq bedrock--initial-gc-threshold gc-cons-threshold)
 (setq gc-cons-threshold 10000000)
 (setq byte-compile-warnings '(not obsolete))
 (setq warning-suppress-log-types '((comp) (bytecomp)))
diff --git a/init.el b/init.el
index 78dd81e..cba11c8 100644
--- a/init.el
+++ b/init.el
@@ -252,3 +252,5 @@ If the new path's directories does not exist, create them."
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  )
+
+(setq gc-cons-threshold (or bedrock--initial-gc-threshold 800000))