cli: show Emacs version at the start of output
This commit is contained in:
parent
c34ed0d194
commit
cb574f5d42
1 changed files with 2 additions and 1 deletions
|
@ -133,13 +133,14 @@ Environment variables:
|
||||||
(let ((start-time (current-time)))
|
(let ((start-time (current-time)))
|
||||||
(run-hooks 'doom-cli-pre-hook)
|
(run-hooks 'doom-cli-pre-hook)
|
||||||
(unless (getenv "__DOOMRESTART")
|
(unless (getenv "__DOOMRESTART")
|
||||||
(print! (start "Executing 'doom %s' %s")
|
(print! (start "Executing 'doom %s' with Emacs %s at %s")
|
||||||
(string-join
|
(string-join
|
||||||
(cons (or (ignore-errors
|
(cons (or (ignore-errors
|
||||||
(doom-cli-name (doom-cli-get command)))
|
(doom-cli-name (doom-cli-get command)))
|
||||||
command)
|
command)
|
||||||
args)
|
args)
|
||||||
" ")
|
" ")
|
||||||
|
emacs-version
|
||||||
(format-time-string "%Y-%m-%d %H:%M:%S")))
|
(format-time-string "%Y-%m-%d %H:%M:%S")))
|
||||||
(print-group!
|
(print-group!
|
||||||
(when-let (result (apply #'doom-cli-execute command args))
|
(when-let (result (apply #'doom-cli-execute command args))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue