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

[Colin Walters]

Index: emacs/lisp/calc/calcalg3.el
diff -c emacs/lisp/calc/calcalg3.el:1.3 emacs/lisp/calc/calcalg3.el:1.4
*** emacs/lisp/calc/calcalg3.el:1.3     Mon Nov 19 02:43:23 2001
--- emacs/lisp/calc/calcalg3.el Sat Feb 23 16:33:19 2002
***************
*** 328,334 ****
      (while (and (> n 0) names)
        (setq var (math-build-var-name (if (consp names)
                                         (car names)
!                                      (concat base (setq nn (1+ nn))))))
        (or (math-expr-contains (cons 'vec but) var)
          (setq vars (cons var vars)
                n (1- n)))
--- 328,335 ----
      (while (and (> n 0) names)
        (setq var (math-build-var-name (if (consp names)
                                         (car names)
!                                      (concat base (int-to-string
!                                                    (setq nn (1+ nn)))))))
        (or (math-expr-contains (cons 'vec but) var)
          (setq vars (cons var vars)
                n (1- n)))