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

[Colin Walters]

Index: emacs/lisp/calc/calcalg2.el
diff -c emacs/lisp/calc/calcalg2.el:1.3 emacs/lisp/calc/calcalg2.el:1.4
*** emacs/lisp/calc/calcalg2.el:1.3     Mon Nov 19 02:43:15 2001
--- emacs/lisp/calc/calcalg2.el Mon Feb 18 15:06:20 2002
***************
*** 3160,3166 ****
              (math-mul val (list 'calcFunc-an var-GenCount))
            (setq var-GenCount (math-add var-GenCount 1))
            (calc-refresh-evaltos 'var-GenCount))
!       (let* ((var (concat "n" (math-get-from-counter 'solve-int)))
               (var2 (list 'var (intern var) (intern (concat "var-" var)))))
          (if (and range (eq solve-full 'all))
              (setq math-solve-ranges (cons (cons var2
--- 3160,3167 ----
              (math-mul val (list 'calcFunc-an var-GenCount))
            (setq var-GenCount (math-add var-GenCount 1))
            (calc-refresh-evaltos 'var-GenCount))
!       (let* ((var (concat "n" (int-to-string
!                                (math-get-from-counter 'solve-int))))
               (var2 (list 'var (intern var) (intern (concat "var-" var)))))
          (if (and range (eq solve-full 'all))
              (setq math-solve-ranges (cons (cons var2