diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-21 17:08:50 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-21 17:08:50 (GMT) |
| commit | a3943563ffdafd746d0ed6e1ff3a78757a4e4a38 (patch) | |
| tree | 16e77435f6e8c7753949f5351d9460b26b62dbe5 /generic | |
| parent | 311218830c0661815c95e45882323e55b9d86695 (diff) | |
| download | tk-a3943563ffdafd746d0ed6e1ff3a78757a4e4a38.zip tk-a3943563ffdafd746d0ed6e1ff3a78757a4e4a38.tar.gz tk-a3943563ffdafd746d0ed6e1ff3a78757a4e4a38.tar.bz2 | |
Remove comment which isn't accurate any more
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkCanvLine.c | 6 | ||||
| -rw-r--r-- | generic/tkCanvPoly.c | 5 | ||||
| -rw-r--r-- | generic/tkCanvText.c | 5 |
3 files changed, 0 insertions, 16 deletions
diff --git a/generic/tkCanvLine.c b/generic/tkCanvLine.c index 0421fbb..b26785e 100644 --- a/generic/tkCanvLine.c +++ b/generic/tkCanvLine.c @@ -1924,12 +1924,6 @@ GetLineIndex( coordPtr += 2; } } else { - - /* - * Some of the paths here leave messages in interp->result, so we have to - * clear it out before storing our own message. - */ - badIndex: Tcl_SetObjResult(interp, Tcl_ObjPrintf("bad index \"%s\"", string)); Tcl_SetErrorCode(interp, "TK", "CANVAS", "ITEM_INDEX", "LINE", NULL); diff --git a/generic/tkCanvPoly.c b/generic/tkCanvPoly.c index aa5622b..97ac202 100644 --- a/generic/tkCanvPoly.c +++ b/generic/tkCanvPoly.c @@ -1764,11 +1764,6 @@ GetPolygonIndex( coordPtr += 2; } } else { - /* - * Some of the paths here leave messages in interp->result, so we have to - * clear it out before storing our own message. - */ - badIndex: Tcl_SetObjResult(interp, Tcl_ObjPrintf("bad index \"%s\"", string)); Tcl_SetErrorCode(interp, "TK", "CANVAS", "ITEM_INDEX", "POLY", NULL); diff --git a/generic/tkCanvText.c b/generic/tkCanvText.c index 965290f..8e85946 100644 --- a/generic/tkCanvText.c +++ b/generic/tkCanvText.c @@ -1527,11 +1527,6 @@ GetTextIndex( *indexPtr = Tk_PointToChar(textPtr->textLayout, (int) (x*cs - y*s), (int) (y*cs + x*s)); } else { - /* - * Some of the paths here leave messages in the interp's result, so we - * have to clear it out before storing our own message. - */ - badIndex: Tcl_SetObjResult(interp, Tcl_ObjPrintf("bad index \"%s\"", string)); Tcl_SetErrorCode(interp, "TK", "CANVAS", "ITEM_INDEX", "TEXT", NULL); |