Fix warning when disabling core packages

This commit is contained in:
Henrik Lissner 2019-12-31 14:10:52 -05:00
parent a5fc782e76
commit b592e58c97
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -223,7 +223,7 @@ necessary package metadata is initialized and available for them."
doom-packages (doom-package-list)) doom-packages (doom-package-list))
(dolist (package doom-packages) (dolist (package doom-packages)
(let ((name (car package))) (let ((name (car package)))
(with-plist! (cdr package) (recipe module disable ignore pin) (with-plist! (cdr package) (recipe modules disable ignore pin)
(if ignore (if ignore
(doom-log "Ignoring package %S" name) (doom-log "Ignoring package %S" name)
(when pin (when pin
@ -239,7 +239,7 @@ necessary package metadata is initialized and available for them."
(doom-log "Disabling package %S" name) (doom-log "Disabling package %S" name)
(cl-pushnew name doom-disabled-packages) (cl-pushnew name doom-disabled-packages)
;; Warn about disabled core packages ;; Warn about disabled core packages
(when (cl-find :core module :key #'car) (when (cl-find :core modules :key #'car)
(print! (warn "%s\n%s") (print! (warn "%s\n%s")
(format "You've disabled %S" name) (format "You've disabled %S" name)
(indent 2 (concat "This is a core package. Disabling it will cause errors, as Doom assumes\n" (indent 2 (concat "This is a core package. Disabling it will cause errors, as Doom assumes\n"