diff options
Diffstat (limited to 'ext/tk/tcltklib.c')
-rw-r--r-- | ext/tk/tcltklib.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/tk/tcltklib.c b/ext/tk/tcltklib.c index a3cacd0143..068babfe93 100644 --- a/ext/tk/tcltklib.c +++ b/ext/tk/tcltklib.c @@ -846,7 +846,7 @@ create_ip_exc(interp, exc, fmt, va_alist) va_init_list(args,fmt); msg = rb_vsprintf(fmt, args); va_end(args); - einfo = rb_exc_new_str(exc, msg); + einfo = rb_exc_new3(exc, msg); rb_ivar_set(einfo, ID_at_interp, interp); if (ptr) { Tcl_ResetResult(ptr->ip); |