diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-17 14:37:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-17 14:37:43 (GMT) |
| commit | a4ffcedd2c623a52832a79162482eb995f317991 (patch) | |
| tree | d35000381cc55551ce762fadc014598259436e4f /generic/tkCanvLine.c | |
| parent | cb194e8983d6236cfd0577257b6e73bbd36f6b83 (diff) | |
| parent | 41d76ae8f1c5e53ff0dbad49c28198f2a96a6168 (diff) | |
| download | tk-a4ffcedd2c623a52832a79162482eb995f317991.zip tk-a4ffcedd2c623a52832a79162482eb995f317991.tar.gz tk-a4ffcedd2c623a52832a79162482eb995f317991.tar.bz2 | |
Merge trunk
Diffstat (limited to 'generic/tkCanvLine.c')
| -rw-r--r-- | generic/tkCanvLine.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tkCanvLine.c b/generic/tkCanvLine.c index b2d8490..022d85e 100644 --- a/generic/tkCanvLine.c +++ b/generic/tkCanvLine.c @@ -1789,7 +1789,7 @@ GetLineIndex( coordPtr += 2; } } else { - if (Tcl_GetIntFromObj(interp, obj, indexPtr) != TCL_OK) { + if (Tcl_GetIntFromObj(NULL, obj, indexPtr) != TCL_OK) { goto badIndex; } *indexPtr &= -2; /* If index is odd, make it even. */ @@ -1807,7 +1807,6 @@ GetLineIndex( */ badIndex: - Tcl_ResetResult(interp); Tcl_SetObjResult(interp, Tcl_ObjPrintf("bad index \"%s\"", string)); Tcl_SetErrorCode(interp, "TK", "CANVAS", "ITEM_INDEX", "LINE", NULL); return TCL_ERROR; |