Add window-system & daemonp props to 'doom info'
This commit is contained in:
parent
20d15c685e
commit
c8cd94a5d2
1 changed files with 7 additions and 2 deletions
|
@ -39,7 +39,12 @@ ready to be pasted in a bug report on github."
|
||||||
(version . ,emacs-version)
|
(version . ,emacs-version)
|
||||||
(features ,@system-configuration-features)
|
(features ,@system-configuration-features)
|
||||||
(build . ,(format-time-string "%b %d, %Y" emacs-build-time))
|
(build . ,(format-time-string "%b %d, %Y" emacs-build-time))
|
||||||
(buildopts ,system-configuration-options))
|
(buildopts ,system-configuration-options)
|
||||||
|
(windowsys . ,(if noninteractive 'batch window-system))
|
||||||
|
(daemonp . ,(cond ((daemonp) 'daemon)
|
||||||
|
((and (require 'server)
|
||||||
|
(server-running-p))
|
||||||
|
'server-running))))
|
||||||
(doom
|
(doom
|
||||||
(version . ,doom-version)
|
(version . ,doom-version)
|
||||||
(build . ,(sh "git log -1 --format=\"%D %h %ci\"")))
|
(build . ,(sh "git log -1 --format=\"%D %h %ci\"")))
|
||||||
|
@ -84,7 +89,7 @@ ready to be pasted in a bug report on github."
|
||||||
(cons name splist)
|
(cons name splist)
|
||||||
name))))
|
name))))
|
||||||
'("n/a")))
|
'("n/a")))
|
||||||
(elpa-packages
|
(elpa
|
||||||
,@(or (ignore-errors
|
,@(or (ignore-errors
|
||||||
(cl-loop for (name . _) in package-alist
|
(cl-loop for (name . _) in package-alist
|
||||||
collect (format "%s" name)))
|
collect (format "%s" name)))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue