eager-load-packages.el

(defvar c/eager-load-packages nil)

(defun c/eager-load-packages ()
  (while (and c/eager-load-packages
              (not (input-pending-p)))
    (condition-case nil
        (require (pop c/eager-load-packages) nil t)
      (error nil)))

  (if c/eager-load-packages
      (c/eager-load-packages-idle)
    ;; Once everything has loaded, start gcmh if it hasn't started yet
    (gcmh-mode)))

(defun c/eager-load-packages-idle ()
  (run-with-idle-timer 0.3 nil #'c/eager-load-packages))

(defun c/eager-load-packages-start ()
  (setq c/eager-load-packages
        (reverse (mapcar #'car (elpaca--queued))))
  (c/eager-load-packages-idle))

(add-hook 'elpaca-after-init-hook #'c/eager-load-packages-start)