branch: elpa/devil
commit b32ded26d4fe6e12b0f64471912759681bda2a39
Author: Susam Pal <su...@susam.net>
Commit: Susam Pal <su...@susam.net>
Add command devil-show-version
---
CHANGES.md | 1 +
devil.el | 8 ++++++++
2 files changed, 9 insertions(+)
diff --git a/CHANGES.md b/CHANGES.md
index 5076899c63..5d9a355d44 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -9,6 +9,7 @@ Changelog
- Add `, k` to the default list of repeatable keys.
- Add `, /` to the default list of repeatable keys.
- Add `, m m y` to the default list of repeatable keys.
+- Add command `devil-show-version` to display Devil version.
### Changed
diff --git a/devil.el b/devil.el
index b24e631ea9..1f3812327b 100644
--- a/devil.el
+++ b/devil.el
@@ -36,6 +36,14 @@
;; key sequences without using modifier keys.
;;; Code:
+(defconst devil-version "0.2.0.pre2"
+ "Devil version number.")
+
+(defun devil-show-version ()
+ "Show Devil version number in the echo area."
+ (interactive)
+ (message "Devil %s" devil-version))
+
(defvar devil-key ","
"The key sequence that begins Devil input.
