From: Colin Walters <walters@gnu.org>
Date: Sat, 23 Feb 2002 21:33:19 +0000 (+0000)
Subject: (calc-invent-variables): Convert integer to string.
X-Git-Tag: ttn-vms-21-2-B4~16513
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=67dbc846a9ba76b8f0c686814e76404ed33cfac7;p=emacs.git

(calc-invent-variables): Convert integer to string.
---

diff --git a/lisp/calc/calcalg3.el b/lisp/calc/calcalg3.el
index 842290df259..cecbc41e7d2 100644
--- a/lisp/calc/calcalg3.el
+++ b/lisp/calc/calcalg3.el
@@ -328,7 +328,8 @@
     (while (and (> n 0) names)
       (setq var (math-build-var-name (if (consp names)
 					 (car names)
-				       (concat base (setq nn (1+ nn))))))
+				       (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)))