[Emacs-diffs] Changes to emacs/lisp/calc/calcalg2.el

[Jay Belanger]

Index: emacs/lisp/calc/calcalg2.el
diff -u emacs/lisp/calc/calcalg2.el:1.20 emacs/lisp/calc/calcalg2.el:1.21
--- emacs/lisp/calc/calcalg2.el:1.20    Tue Oct 11 19:41:48 2005
+++ emacs/lisp/calc/calcalg2.el Sat Jan 21 04:28:29 2006
@@ -2012,7 +2012,7 @@
                      n (1+ n)
                      t1 (cdr t1)))
              (setq n (math-build-polynomial-expr poly high))
-             (if (memq low '(0 1))
+             (if (= low 1)
                  n
                (math-sub n (math-build-polynomial-expr poly
                                                        (math-sub low 1))))))