diff options
Diffstat (limited to 'generic/tkTrig.c')
| -rw-r--r-- | generic/tkTrig.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkTrig.c b/generic/tkTrig.c index 5f4d267..3da1e5c 100644 --- a/generic/tkTrig.c +++ b/generic/tkTrig.c @@ -1441,7 +1441,7 @@ TkMakeBezierPostscript( control[6], Tk_CanvasPsY(canvas, control[7])); } - Tcl_AppendResult(interp, Tcl_GetString(psObj), NULL); + Tcl_AppendObjToObj(Tcl_GetObjResult(interp), psObj); Tcl_DecrRefCount(psObj); } @@ -1552,7 +1552,7 @@ TkMakeRawCurvePostscript( } } - Tcl_AppendResult(interp, Tcl_GetString(psObj), NULL); + Tcl_AppendObjToObj(Tcl_GetObjResult(interp), psObj); Tcl_DecrRefCount(psObj); } |