From 88258edfb6e934db5e672183273a2cf706da0890 Mon Sep 17 00:00:00 2001 From: Colin Walters Date: Mon, 18 Feb 2002 20:06:20 +0000 Subject: [PATCH] (math-solve-get-int): Convert return value from `math-get-from-counter' to a string before calling `concat' on it. --- lisp/calc/calcalg2.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/calc/calcalg2.el b/lisp/calc/calcalg2.el index c5ed7688d3d..0b21dd86f74 100644 --- a/lisp/calc/calcalg2.el +++ b/lisp/calc/calcalg2.el @@ -3160,7 +3160,8 @@ (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))) + (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 -- 2.39.5