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

70
lisp/cli/doctor.el
View file

@ -121,42 +121,44 @@ 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..."))
(unless (functionp 'json-serialize) (print-group!
(warn! "Emacs was not built with native JSON support") (unless (functionp 'json-serialize)
(explain! "Users will see a substantial performance gain by building Emacs with " (warn! "Emacs was not built with native JSON support")
"jansson support (i.e. a native JSON library), particularly LSP users. " (explain! "Users will see a substantial performance gain by building Emacs with "
"You must install a prebuilt Emacs binary with this included, or compile " "jansson support (i.e. a native JSON library), particularly LSP users. "
"Emacs with the --with-json option.")) "You must install a prebuilt Emacs binary with this included, or compile "
(unless (featurep 'native-compile) "Emacs with the --with-json option."))
(warn! "Emacs was not built with native compilation support") (unless (featurep 'native-compile)
(explain! "Users will see a substantial performance gain by building Emacs with " (warn! "Emacs was not built with native compilation support")
"native compilation support, availible in emacs 28+." (explain! "Users will see a substantial performance gain by building Emacs with "
"You must install a prebuilt Emacs binary with this included, or compile " "native compilation support, availible in emacs 28+."
"Emacs with the --with-native-compilation option.")) "You must install a prebuilt Emacs binary with this included, or compile "
"Emacs with the --with-native-compilation option.")))
(print! (start "Checking for private config conflicts...")) (print! (start "Checking for private config conflicts..."))
(let* ((xdg-dir (concat (or (getenv "XDG_CONFIG_HOME") (print-group!
"~/.config") (let* ((xdg-dir (concat (or (getenv "XDG_CONFIG_HOME")
"/doom/")) "~/.config")
(doom-dir (or (getenv "DOOMDIR") "/doom/"))
"~/.doom.d/")) (doom-dir (or (getenv "DOOMDIR")
(dir (if (file-directory-p xdg-dir) "~/.doom.d/"))
xdg-dir (dir (if (file-directory-p xdg-dir)
doom-dir))) xdg-dir
(when (file-equal-p dir doom-emacs-dir) doom-dir)))
(print! (error "Doom was cloned to %S, not ~/.emacs.d or ~/.config/emacs" (when (file-equal-p dir doom-emacs-dir)
(path dir))) (print! (error "Doom was cloned to %S, not ~/.emacs.d or ~/.config/emacs"
(explain! "Doom's source and your private Doom config have to live in separate directories. " (path dir)))
"Putting them in the same directory (without changing the DOOMDIR environment " (explain! "Doom's source and your private Doom config have to live in separate directories. "
"variable) will cause errors on startup.")) "Putting them in the same directory (without changing the DOOMDIR environment "
(when (and (not (file-equal-p xdg-dir doom-dir)) "variable) will cause errors on startup."))
(file-directory-p xdg-dir) (when (and (not (file-equal-p xdg-dir doom-dir))
(file-directory-p doom-dir)) (file-directory-p xdg-dir)
(print! (warn "Detected two private configs, in %s and %s") (file-directory-p doom-dir))
(abbreviate-file-name xdg-dir) (print! (warn "Detected two private configs, in %s and %s")
doom-dir) (abbreviate-file-name xdg-dir)
(explain! "The second directory will be ignored, as it has lower precedence."))) doom-dir)
(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)