doom-initialize: don't use when-let this early (subr-x not loaded yet)
This commit is contained in:
parent
9895a42b17
commit
dc9133fcc7
1 changed files with 9 additions and 8 deletions
|
@ -124,14 +124,15 @@ to speed up startup."
|
||||||
(setq load-path (append load-path (directory-files package-user-dir t "^[a-zA-Z0-9]" t)))
|
(setq load-path (append load-path (directory-files package-user-dir t "^[a-zA-Z0-9]" t)))
|
||||||
|
|
||||||
;; Ensure core packages are installed
|
;; Ensure core packages are installed
|
||||||
(when-let (core-packages (cl-remove-if 'package-installed-p doom-protected-packages))
|
(let ((core-packages (cl-remove-if 'package-installed-p doom-protected-packages)))
|
||||||
|
(when core-packages
|
||||||
(package-refresh-contents)
|
(package-refresh-contents)
|
||||||
(dolist (pkg core-packages)
|
(dolist (pkg core-packages)
|
||||||
(let ((inhibit-message t))
|
(let ((inhibit-message t))
|
||||||
(package-install pkg))
|
(package-install pkg))
|
||||||
(if (package-installed-p pkg)
|
(if (package-installed-p pkg)
|
||||||
(message "Installed %s" pkg)
|
(message "Installed %s" pkg)
|
||||||
(error "Couldn't install %s" pkg))))
|
(error "Couldn't install %s" pkg)))))
|
||||||
|
|
||||||
(require 'quelpa)
|
(require 'quelpa)
|
||||||
(require 'use-package)
|
(require 'use-package)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue