[nongnu] elpa/devil b32ded26d4 19/49: Add command devil-show-version

[ELPA Syncer]

branch: elpa/devil
commit b32ded26d4fe6e12b0f64471912759681bda2a39
Author: Susam Pal <susam@susam.net>
Commit: Susam Pal <susam@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.