diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-24 14:00:22 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-24 14:00:22 (GMT) |
commit | e0b0e0d820827f64af467e09ae1556ac755d9f11 (patch) | |
tree | 00c1f2568bb436b660acd8ed3b863b86b96cf086 /generic/tkConsole.c | |
parent | 2ab1424bf6fff3a16b3b76dc5321491e2ccfcd79 (diff) | |
parent | 7a60939a9fb681c46c9a5db933814ee54e88ba54 (diff) | |
download | tk-e0b0e0d820827f64af467e09ae1556ac755d9f11.zip tk-e0b0e0d820827f64af467e09ae1556ac755d9f11.tar.gz tk-e0b0e0d820827f64af467e09ae1556ac755d9f11.tar.bz2 |
Merge core-8-5-branch
Various Tcl_GetIndexFromObj -> Tcl_GetIndexFromObjStruct changes.
Diffstat (limited to 'generic/tkConsole.c')
-rw-r--r-- | generic/tkConsole.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkConsole.c b/generic/tkConsole.c index 684c9aa..b78b6aa 100644 --- a/generic/tkConsole.c +++ b/generic/tkConsole.c @@ -697,8 +697,8 @@ ConsoleObjCmd( Tcl_WrongNumArgs(interp, 1, objv, "option ?arg?"); return TCL_ERROR; } - if (Tcl_GetIndexFromObj(interp, objv[1], options, "option", 0, &index) - != TCL_OK) { + if (Tcl_GetIndexFromObjStruct(interp, objv[1], options, + sizeof(char), "option", 0, &index) != TCL_OK) { return TCL_ERROR; } @@ -787,8 +787,8 @@ InterpreterObjCmd( Tcl_WrongNumArgs(interp, 1, objv, "option arg"); return TCL_ERROR; } - if (Tcl_GetIndexFromObj(interp, objv[1], options, "option", 0, &index) - != TCL_OK) { + if (Tcl_GetIndexFromObjStruct(interp, objv[1], options, + sizeof(char), "option", 0, &index) != TCL_OK) { return TCL_ERROR; } |