diff options
| author | Jay Belanger | 2005-01-31 06:29:39 +0000 |
|---|---|---|
| committer | Jay Belanger | 2005-01-31 06:29:39 +0000 |
| commit | ad1c32c76f21950d53291fc5b9c6397ca358e982 (patch) | |
| tree | dcdc2349d4ff295813843a838a9853e0e9c8fe3c | |
| parent | dd9041c77a7a6c325df620d38f773215d3921343 (diff) | |
| download | emacs-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.el | 3 |
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 | " "))) |