Fix -y/--yes/YES in doom quickstart

This commit is contained in:
Henrik Lissner 2019-03-28 02:24:19 -04:00
parent ddfcc4299c
commit 2f0ad0e269
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -62,9 +62,8 @@ packages and regenerates the autoloads file."
;; Ask if Emacs.app should be patched ;; Ask if Emacs.app should be patched
(if (member "--no-env" args) (if (member "--no-env" args)
(print! (yellow "Not generating envvars file, as requested")) (print! (yellow "Not generating envvars file, as requested"))
(when (or (file-exists-p doom-env-file) (when (or doom-auto-accept
(y-or-n-p "Would you like to generate an envvars file (see `doom help env` for details)?")) (y-or-n-p "Generate an env file? (see `doom help env` for details)"))
(setenv "DOOMENV" "1")
(doom-reload-env-file 'force-p))) (doom-reload-env-file 'force-p)))
;; Install Doom packages ;; Install Doom packages
@ -78,7 +77,8 @@ packages and regenerates the autoloads file."
(if (member "--no-fonts" args) (if (member "--no-fonts" args)
(print! (yellow "Not installing fonts, as requested")) (print! (yellow "Not installing fonts, as requested"))
(when (y-or-n-p "Download and install all-the-icon's fonts?") (when (or doom-auto-accept
(y-or-n-p "Download and install all-the-icon's fonts?"))
(require 'all-the-icons) (require 'all-the-icons)
(all-the-icons-install-fonts 'yes))) (all-the-icons-install-fonts 'yes)))