# HG changeset patch
# User Jay Belanger <jay.p.belanger@gmail.com>
# Date 1176690604 0
# Node ID 429f941a58b7d9729fd229f283f591830b20024c
# Parent  62cb849c21a0565a39c242f9e58ef5bd97ce392a
(calc-version): New function.

diff -r 62cb849c21a0 -r 429f941a58b7 lisp/calc/calc.el
--- a/lisp/calc/calc.el	Mon Apr 16 01:57:04 2007 +0000
+++ b/lisp/calc/calc.el	Mon Apr 16 02:30:04 2007 +0000
@@ -1148,6 +1148,11 @@
 
 (defvar calc-alg-map) ; Defined in calc-ext.el
 
+(defun calc-version ()
+  "Return version of this version of Calc."
+  (interactive)
+  (message (concat "Calc version " calc-version)))
+
 (defun calc-mode ()
   "Calculator major mode.