Fix doom/info in noninteractive sessions

This commit is contained in:
Henrik Lissner 2018-08-16 01:26:28 +02:00
parent 6a582d4f5f
commit 480378d30c
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -11,7 +11,8 @@
"Returns diagnostic information about the current Emacs session in markdown, "Returns diagnostic information about the current Emacs session in markdown,
ready to be pasted in a bug report on github." ready to be pasted in a bug report on github."
(require 'vc-git) (require 'vc-git)
(let ((default-directory doom-emacs-dir)) (let ((default-directory doom-emacs-dir)
(doom-modules (doom-modules)))
(format (format
(concat "- OS: %s (%s)\n" (concat "- OS: %s (%s)\n"
"- Emacs: %s (%s)\n" "- Emacs: %s (%s)\n"
@ -47,7 +48,7 @@ ready to be pasted in a bug report on github."
(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
for key being the hash-keys of (doom-modules) for key being the hash-keys of doom-modules
if (or (not cat) (not (eq cat (car key)))) if (or (not cat) (not (eq cat (car key))))
do (setq cat (car key)) and collect cat do (setq cat (car key)) and collect cat
else collect else collect