From 4d20655f78f73a4bb9b0f4ded5a9ea24322214cd Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Sat, 18 May 2019 18:02:38 -0400
Subject: [PATCH] Optimize incremental loading

Interrupt package loading if Emacs recieves input. This further reduces
percieved pauses at startup.
---
 core/core.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/core/core.el b/core/core.el
index 6cc28a06f..d802cbd45 100644
--- a/core/core.el
+++ b/core/core.el
@@ -324,7 +324,8 @@ intervals."
           (when req
             (doom-log "Incrementally loading %s" req)
             (condition-case e
-                (require req nil t)
+                (or (while-no-input (require req nil t) t)
+                    (push req reqs))
               ((error debug)
                (message "Failed to load '%s' package incrementally, because: %s"
                         req e)))