diff options
| author | Colin Walters <walters@gnu.org> | 2002-02-23 21:33:19 +0000 |
|---|---|---|
| committer | Colin Walters <walters@gnu.org> | 2002-02-23 21:33:19 +0000 |
| commit | 67dbc846a9ba76b8f0c686814e76404ed33cfac7 (patch) | |
| tree | a9194c4f3685ffb70f92069ac254b51a7ce7924a /lisp/calc | |
| parent | f227fdedfb1d71fd234cd729ca81bbb9bee44e1a (diff) | |
| download | emacs-67dbc846a9ba76b8f0c686814e76404ed33cfac7.tar.gz | |
(calc-invent-variables): Convert integer to string.
Diffstat (limited to 'lisp/calc')
| -rw-r--r-- | lisp/calc/calcalg3.el | 3 |
1 files changed, 2 insertions, 1 deletions
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))) |