diff options
| author | Jay Belanger | 2004-11-09 20:30:40 +0000 |
|---|---|---|
| committer | Jay Belanger | 2004-11-09 20:30:40 +0000 |
| commit | f7917133cb39354f3cb1e4b9ce768a10858fce6d (patch) | |
| tree | 72346496e8e9401f383972509fbc744e9d4725e0 | |
| parent | dc78141338626ca255d34b58f0ec035c4a0d22c3 (diff) | |
| download | emacs-f7917133cb39354f3cb1e4b9ce768a10858fce6d.tar.gz emacs-f7917133cb39354f3cb1e4b9ce768a10858fce6d.zip | |
(math-expand-form): Use declared variable math-mt-many.
| -rw-r--r-- | lisp/calc/calc-poly.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-poly.el b/lisp/calc/calc-poly.el index 213b7dc4474..6ede0888319 100644 --- a/lisp/calc/calc-poly.el +++ b/lisp/calc/calc-poly.el | |||
| @@ -1040,7 +1040,7 @@ | |||
| 1040 | (memq (car-safe (nth 1 expr)) '(+ -)) | 1040 | (memq (car-safe (nth 1 expr)) '(+ -)) |
| 1041 | (integerp (nth 2 expr)) | 1041 | (integerp (nth 2 expr)) |
| 1042 | (if (> (nth 2 expr) 0) | 1042 | (if (> (nth 2 expr) 0) |
| 1043 | (or (and (or (> mmt-many 500000) (< mmt-many -500000)) | 1043 | (or (and (or (> math-mt-many 500000) (< math-mt-many -500000)) |
| 1044 | (math-expand-power (nth 1 expr) (nth 2 expr) | 1044 | (math-expand-power (nth 1 expr) (nth 2 expr) |
| 1045 | nil t)) | 1045 | nil t)) |
| 1046 | (list '* | 1046 | (list '* |