diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 21:20:21 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 21:20:21 (GMT) |
commit | 1a1118fa21d731504dac09ed2e6d6238601f5c84 (patch) | |
tree | 582b351a98fe27e820ca3d6d0281519c1a11dbcf /generic/tkVisual.c | |
parent | d72c843661bf5789ff40389b8b71707d92437397 (diff) | |
download | tk-1a1118fa21d731504dac09ed2e6d6238601f5c84.zip tk-1a1118fa21d731504dac09ed2e6d6238601f5c84.tar.gz tk-1a1118fa21d731504dac09ed2e6d6238601f5c84.tar.bz2 |
More -1 -> TCL_INDEX_NONE. More TCL_UNUSED(
Diffstat (limited to 'generic/tkVisual.c')
-rw-r--r-- | generic/tkVisual.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkVisual.c b/generic/tkVisual.c index 09d1fa1..799cdbf 100644 --- a/generic/tkVisual.c +++ b/generic/tkVisual.c @@ -208,7 +208,7 @@ Tk_GetVisual( for (dictPtr = visualNames; dictPtr->minLength; dictPtr++) { Tcl_AppendPrintfToObj(msgObj, "%s, ", dictPtr->name); } - Tcl_AppendToObj(msgObj, "or default", -1); + Tcl_AppendToObj(msgObj, "or default", TCL_INDEX_NONE); Tcl_SetObjResult(interp, msgObj); Tcl_SetErrorCode(interp, "TK", "LOOKUP", "VISUAL", string, NULL); return NULL; @@ -239,7 +239,7 @@ Tk_GetVisual( &numVisuals); if (visInfoList == NULL) { Tcl_SetObjResult(interp, Tcl_NewStringObj( - "couldn't find an appropriate visual", -1)); + "couldn't find an appropriate visual", TCL_INDEX_NONE)); Tcl_SetErrorCode(interp, "TK", "VISUAL", "INAPPROPRIATE", NULL); return NULL; } |