diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2004-11-09 20:30:40 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2004-11-09 20:30:40 +0000 |
| commit | f7917133cb39354f3cb1e4b9ce768a10858fce6d (patch) | |
| tree | 72346496e8e9401f383972509fbc744e9d4725e0 /lisp/calc/calc-poly.el | |
| parent | dc78141338626ca255d34b58f0ec035c4a0d22c3 (diff) | |
| download | emacs-f7917133cb39354f3cb1e4b9ce768a10858fce6d.tar.gz emacs-f7917133cb39354f3cb1e4b9ce768a10858fce6d.tar.bz2 emacs-f7917133cb39354f3cb1e4b9ce768a10858fce6d.zip | |
(math-expand-form): Use declared variable math-mt-many.
Diffstat (limited to 'lisp/calc/calc-poly.el')
| -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 @@ (memq (car-safe (nth 1 expr)) '(+ -)) (integerp (nth 2 expr)) (if (> (nth 2 expr) 0) - (or (and (or (> mmt-many 500000) (< mmt-many -500000)) + (or (and (or (> math-mt-many 500000) (< math-mt-many -500000)) (math-expand-power (nth 1 expr) (nth 2 expr) nil t)) (list '* |