mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Don't show hostname in doom info or doctor output
It doesn't help me, and some folks may not want it publicized.
This commit is contained in:
@ -123,7 +123,7 @@
|
|||||||
(color 31 " (mismatch)")))
|
(color 31 " (mismatch)")))
|
||||||
(when (boundp 'system-configuration-features)
|
(when (boundp 'system-configuration-features)
|
||||||
(message "Compiled with:\n%s" (indented 2 system-configuration-features)))
|
(message "Compiled with:\n%s" (indented 2 system-configuration-features)))
|
||||||
(message "uname -a:\n%s\n" (indented 2 (sh "uname -a")))
|
(message "uname -msrv:\n%s\n" (indented 2 (sh "uname -msrv")))
|
||||||
|
|
||||||
;; --- is emacs set up properly? ------------------------------
|
;; --- is emacs set up properly? ------------------------------
|
||||||
|
|
||||||
|
@ -47,7 +47,7 @@ ready to be pasted in a bug report on github."
|
|||||||
(if IS-WINDOWS
|
(if IS-WINDOWS
|
||||||
"n/a"
|
"n/a"
|
||||||
(with-temp-buffer
|
(with-temp-buffer
|
||||||
(unless (zerop (call-process "uname" nil t nil "-a"))
|
(unless (zerop (call-process "uname" nil t nil "-msrv"))
|
||||||
(insert (format "%s" system-type)))
|
(insert (format "%s" system-type)))
|
||||||
(string-trim (buffer-string))))
|
(string-trim (buffer-string))))
|
||||||
(or (cl-loop with cat = nil
|
(or (cl-loop with cat = nil
|
||||||
|
Reference in New Issue
Block a user