aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJay Belanger2005-01-31 06:29:39 +0000
committerJay Belanger2005-01-31 06:29:39 +0000
commitad1c32c76f21950d53291fc5b9c6397ca358e982 (patch)
treedcdc2349d4ff295813843a838a9853e0e9c8fe3c
parentdd9041c77a7a6c325df620d38f773215d3921343 (diff)
downloademacs-ad1c32c76f21950d53291fc5b9c6397ca358e982.tar.gz
emacs-ad1c32c76f21950d53291fc5b9c6397ca358e982.zip
(calc-language): Adjust docstring.
(calc-set-mode-line): Add LaTeX support. (math-expr-special-function-mapping): New variable.
-rw-r--r--lisp/calc/calc.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index ba5cda831e1..a1887daea46 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -405,6 +405,7 @@ If `C' is present, display outer brackets for matrices (centered).")
405 pascal Use Pascal language notation. 405 pascal Use Pascal language notation.
406 fortran Use Fortran language notation. 406 fortran Use Fortran language notation.
407 tex Use TeX notation. 407 tex Use TeX notation.
408 latex Use LaTeX notation.
408 eqn Use eqn notation. 409 eqn Use eqn notation.
409 math Use Mathematica(tm) notation. 410 math Use Mathematica(tm) notation.
410 maple Use Maple notation.") 411 maple Use Maple notation.")
@@ -704,6 +705,7 @@ If nil, selections displayed but ignored.")
704(defvar math-eval-rules-cache-tag t) 705(defvar math-eval-rules-cache-tag t)
705(defvar math-radix-explicit-format t) 706(defvar math-radix-explicit-format t)
706(defvar math-expr-function-mapping nil) 707(defvar math-expr-function-mapping nil)
708(defvar math-expr-special-function-mapping nil)
707(defvar math-expr-variable-mapping nil) 709(defvar math-expr-variable-mapping nil)
708(defvar math-read-expr-quotes nil) 710(defvar math-read-expr-quotes nil)
709(defvar math-working-step nil) 711(defvar math-working-step nil)
@@ -1368,6 +1370,7 @@ See calc-keypad for details."
1368 (if calc-leading-zeros "Zero " "") 1370 (if calc-leading-zeros "Zero " "")
1369 (cond ((null calc-language) "") 1371 (cond ((null calc-language) "")
1370 ((eq calc-language 'tex) "TeX ") 1372 ((eq calc-language 'tex) "TeX ")
1373 ((eq calc-language 'latex) "LaTeX ")
1371 (t (concat 1374 (t (concat
1372 (capitalize (symbol-name calc-language)) 1375 (capitalize (symbol-name calc-language))
1373 " "))) 1376 " ")))