aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/calc/calc.el7
1 files changed, 0 insertions, 7 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 4b16209915e..5b48938a650 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -6,7 +6,6 @@
6;; Author: David Gillespie <daveg@synaptics.com> 6;; Author: David Gillespie <daveg@synaptics.com>
7;; Maintainer: Jay Belanger <jay.p.belanger@gmail.com> 7;; Maintainer: Jay Belanger <jay.p.belanger@gmail.com>
8;; Keywords: convenience, extensions 8;; Keywords: convenience, extensions
9;; Version: 2.1
10 9
11;; This file is part of GNU Emacs. 10;; This file is part of GNU Emacs.
12 11
@@ -901,7 +900,6 @@ Used by `calc-user-invocation'.")
901(put 'math-underflow 'error-conditions '(error math-underflow calc-error)) 900(put 'math-underflow 'error-conditions '(error math-underflow calc-error))
902(put 'math-underflow 'error-message "Floating-point underflow occurred") 901(put 'math-underflow 'error-message "Floating-point underflow occurred")
903 902
904(defconst calc-version "2.1")
905(defvar calc-trail-pointer nil 903(defvar calc-trail-pointer nil
906 "The \"current\" entry in trail buffer.") 904 "The \"current\" entry in trail buffer.")
907(defvar calc-trail-overlay nil 905(defvar calc-trail-overlay nil
@@ -1204,11 +1202,6 @@ Used by `calc-user-invocation'.")
1204 1202
1205(defvar calc-alg-map) ; Defined in calc-ext.el 1203(defvar calc-alg-map) ; Defined in calc-ext.el
1206 1204
1207(defun calc-version ()
1208 "Return version of this version of Calc."
1209 (interactive)
1210 (message "Calc version %s" calc-version))
1211
1212(defun calc-mode () 1205(defun calc-mode ()
1213 "Calculator major mode. 1206 "Calculator major mode.
1214 1207