Index: generic/nsfError.c =================================================================== diff -u -r8eecbe5b3a2640ba1d3e1dc6dc5e9cec0c2a26ba -rb8fe2d48d0baf637e303b5d32f00ee948a8bfbe6 --- generic/nsfError.c (.../nsfError.c) (revision 8eecbe5b3a2640ba1d3e1dc6dc5e9cec0c2a26ba) +++ generic/nsfError.c (.../nsfError.c) (revision b8fe2d48d0baf637e303b5d32f00ee948a8bfbe6) @@ -250,7 +250,7 @@ NsfDStringVPrintf(&ds, fmt, ap); va_end(ap); - Tcl_SetObjResult(interp, Tcl_NewStringObj(Tcl_DStringValue(&ds), -1)); + Tcl_SetObjResult(interp, Tcl_NewStringObj(Tcl_DStringValue(&ds), Tcl_DStringLength(&ds))); Tcl_DStringFree(&ds); return TCL_ERROR;