Don't use deprecated Tcl_DStringTrunc any more.