blob: 19b88a914e9cfb30ceddba78228c630cdde7893e (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
--- interface/tk_c.c.orig
+++ interface/tk_c.c
@@ -913,7 +913,7 @@
vsnprintf(buf, sizeof(buf), fmt, ap);
Tcl_Eval(my_interp, buf);
va_end(ap);
- return my_interp->result;
+ return Tcl_GetStringResult(my_interp);
}
static const char *v_get2(const char *v1, const char *v2)
|