From 26514e2834603ff59181d79ffc197ed69eaa187c Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Wed, 28 Mar 2018 00:52:45 -0400
Subject: [PATCH] Optimize doom-initialize-packages for cold startup

---
 core/core-packages.el | 25 +++++++++++++------------
 1 file changed, 13 insertions(+), 12 deletions(-)

diff --git a/core/core-packages.el b/core/core-packages.el
index 365be67d2..5605407ac 100644
--- a/core/core-packages.el
+++ b/core/core-packages.el
@@ -254,19 +254,20 @@ them."
                  if (file-exists-p path)
                  do (_load path)))
 
-      ;; `package-alist'
-      (when (or (eq force-p t) (not (bound-and-true-p package-alist)))
-        (setq load-path doom-site-load-path)
-        (require 'package)
-        (setq package-activated-list nil)
-        (package-initialize))
+      (unless (eq force-p 'internal)
+        ;; `package-alist'
+        (when (or force-p (not (bound-and-true-p package-alist)))
+          (setq load-path doom-site-load-path)
+          (require 'package)
+          (setq package-activated-list nil)
+          (package-initialize))
 
-      ;; `quelpa-cache'
-      (when (or (eq force-p t) (not (bound-and-true-p quelpa-cache)))
-        (require 'quelpa)
-        (setq quelpa-initialized-p nil)
-        (or (quelpa-setup-p)
-            (error "Could not initialize quelpa"))))))
+        ;; `quelpa-cache'
+        (when (or force-p (not (bound-and-true-p quelpa-cache)))
+          (require 'quelpa)
+          (setq quelpa-initialized-p nil)
+          (or (quelpa-setup-p)
+              (error "Could not initialize quelpa")))))))
 
 
 ;;