docs(cli): doom install: reformat output

Also simplifies the first-timer "things you should know" snippet after
running 'doom install'.
This commit is contained in:
Henrik Lissner 2024-09-04 14:47:19 -04:00
parent 52c91cc51c
commit 42df7cb9fd
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
3 changed files with 24 additions and 29 deletions

View file

@ -270,19 +270,18 @@ Note: warnings are not considered failures.")
hooks-path))
(user-error "Aborted")))
(make-directory hooks-path 'parents)
(print-group!
(dolist (hook '("commit-msg" "pre-push"))
(let* ((hook (doom-path hooks-path hook))
(overwrite-p (file-exists-p hook)))
(with-temp-file hook
(insert "#!/usr/bin/env sh\n"
(doom-path doom-emacs-dir "bin/doom")
" --no-color ci hook " (file-name-base hook)
" \"$@\""))
(set-file-modes hook #o700)
(print! (success "%s %s")
(if overwrite-p "Overwrote" "Created")
(path hook)))))))
(dolist (hook '("commit-msg" "pre-push"))
(let* ((hook (doom-path hooks-path hook))
(overwrite-p (file-exists-p hook)))
(with-temp-file hook
(insert "#!/usr/bin/env sh\n"
(doom-path doom-emacs-dir "bin/doom")
" --no-color ci hook " (file-name-base hook)
" \"$@\""))
(set-file-modes hook #o700)
(print! (success "%s %s")
(if overwrite-p "Overwrote" "Created")
(path hook))))))
;; TODO Move to 'doom lint commits'
(defcli! (ci lint-commits) (from &optional to)

View file

@ -99,15 +99,15 @@ Change `$DOOMDIR' with the `--doomdir' option, e.g.
;; Install Doom packages
(if (eq install? :no)
(print! (warn "Not installing plugins, as requested"))
(print! "Installing plugins")
(doom-packages-ensure))
(print! (start "Installing plugins"))
(print-group! (doom-packages-ensure)))
(print! "Regenerating autoloads files")
(doom-profile-generate)
(print! (start "Synchronizing default profile..."))
(print-group! (doom-profile-generate))
(if (eq hooks? :no)
(print! (warn "Not deploying commit-msg and pre-push git hooks, as requested"))
(print! "Deploying commit-msg and pre-push git hooks")
(print! (start "Deploying commit-msg and pre-push git hooks"))
(print-group!
(condition-case e
(call! `(ci deploy-hooks ,@(if yes? '("--force"))))
@ -117,7 +117,7 @@ Change `$DOOMDIR' with the `--doomdir' option, e.g.
(when (file-exists-p "~/.emacs")
(print! (warn "A ~/.emacs file was detected. This conflicts with Doom and should be deleted!")))
(print! (success "\nFinished! Doom is ready to go!\n"))
(print! (success "Finished! Doom is ready to go!\n"))
(with-temp-buffer
(insert-file-contents (doom-path doom-emacs-dir "templates/QUICKSTART_INTRO"))
(print! "%s" (buffer-string)))))