emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

docs: properly indent core doctor checks

Browse source
This commit is contained in:
Henrik Lissner 2023-09-12 02:30:20 +02:00
parent 95a5a32aac
commit 447b59c9c0
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 36 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/cli/doctor.el
View file

@ -121,7 +121,8 @@ in."
"these exist.\n\n" "these exist.\n\n"
"Chemacs users may ignore this warning.")))) "Chemacs users may ignore this warning."))))
(print! (start "Checking for great Emacs features...")) (print! (start "Checking for missing Emacs features..."))
(print-group!
(unless (functionp 'json-serialize) (unless (functionp 'json-serialize)
(warn! "Emacs was not built with native JSON support") (warn! "Emacs was not built with native JSON support")
(explain! "Users will see a substantial performance gain by building Emacs with " (explain! "Users will see a substantial performance gain by building Emacs with "
@ -133,9 +134,10 @@ in."
(explain! "Users will see a substantial performance gain by building Emacs with " (explain! "Users will see a substantial performance gain by building Emacs with "
"native compilation support, availible in emacs 28+." "native compilation support, availible in emacs 28+."
"You must install a prebuilt Emacs binary with this included, or compile " "You must install a prebuilt Emacs binary with this included, or compile "
"Emacs with the --with-native-compilation option.")) "Emacs with the --with-native-compilation option.")))
(print! (start "Checking for private config conflicts...")) (print! (start "Checking for private config conflicts..."))
(print-group!
(let* ((xdg-dir (concat (or (getenv "XDG_CONFIG_HOME") (let* ((xdg-dir (concat (or (getenv "XDG_CONFIG_HOME")
"~/.config") "~/.config")
"/doom/")) "/doom/"))
@ -156,7 +158,7 @@ in."
(print! (warn "Detected two private configs, in %s and %s") (print! (warn "Detected two private configs, in %s and %s")
(abbreviate-file-name xdg-dir) (abbreviate-file-name xdg-dir)
doom-dir) doom-dir)
(explain! "The second directory will be ignored, as it has lower precedence."))) (explain! "The second directory will be ignored, as it has lower precedence."))))
(print! (start "Checking for stale elc files...")) (print! (start "Checking for stale elc files..."))
(elc-check-dir doom-core-dir) (elc-check-dir doom-core-dir)