awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Add doom/version command

Browse Source
This commit is contained in:
Henrik Lissner
2018-05-07 18:10:58 +02:00
parent 4ef70174b0
commit 7269abbe2f
2 changed files with 16 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
core/autoload/help.el
View File

@ -113,3 +113,18 @@ in, or d) the module associated with the current major mode (see
(fill-region (point-min) (point-max)))
(quiet! (indent-region (point-min) (point-max))))
(string-trim (buffer-string))))
;;;###autoload
(defun doom/version ()
"Display the current version of Doom & Emacs, including the current Doom
branch and commit."
(interactive)
(message "Doom v%s (Emacs v%s). Branch: %s. Commit: %s."
doom-version
emacs-version
(if-let* ((branch (vc-git--symbolic-ref "core/core.el")))
branch
"n/a")
(if-let* ((rev (vc-git-working-revision "core/core.el")))
rev
"n/a")))