Fix void doom-package-list error on first install

This commit is contained in:
Henrik Lissner 2019-07-22 03:48:29 +02:00
parent 0890851e81
commit ea65f82e4d
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 4 additions and 1 deletions

View file

@ -1,6 +1,6 @@
;;; core/autoload/packages.el -*- lexical-binding: t; -*- ;;; core/autoload/packages.el -*- lexical-binding: t; -*-
(require 'core-packages) (require 'straight)
;; ;;

View file

@ -142,6 +142,9 @@ necessary package metadata is initialized and available for them."
(dolist (package (straight--directory-files (straight--build-dir))) (dolist (package (straight--directory-files (straight--build-dir)))
(add-to-list 'load-path (directory-file-name (straight--build-dir package))))) (add-to-list 'load-path (directory-file-name (straight--build-dir package)))))
(when (or force-p (not doom-packages)) (when (or force-p (not doom-packages))
;; On first install, the packages API will be unavailable
(unless (fboundp 'doom-package-list)
(load! "autoload/packages.el"))
(setq doom-disabled-packages nil (setq doom-disabled-packages nil
doom-packages (doom-package-list)) doom-packages (doom-package-list))
(cl-loop for (pkg . plist) in doom-packages (cl-loop for (pkg . plist) in doom-packages