summaryrefslogtreecommitdiffstats
path: root/generic/tkFocus.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-24 14:00:22 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-24 14:00:22 (GMT)
commitb744234ad43b7dc3544f0184e2b76d9f28137551 (patch)
tree00c1f2568bb436b660acd8ed3b863b86b96cf086 /generic/tkFocus.c
parentc8bf7eaf6e7d5dbcf3c5ee48102077d9579e1de2 (diff)
parentbbbc32416a291c8abda4072bafa9579418034907 (diff)
downloadtk-b744234ad43b7dc3544f0184e2b76d9f28137551.zip
tk-b744234ad43b7dc3544f0184e2b76d9f28137551.tar.gz
tk-b744234ad43b7dc3544f0184e2b76d9f28137551.tar.bz2
Merge core-8-5-branch
Various Tcl_GetIndexFromObj -> Tcl_GetIndexFromObjStruct changes.
Diffstat (limited to 'generic/tkFocus.c')
-rw-r--r--generic/tkFocus.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkFocus.c b/generic/tkFocus.c
index cfd2216..bdd953e 100644
--- a/generic/tkFocus.c
+++ b/generic/tkFocus.c
@@ -162,8 +162,8 @@ Tk_FocusObjCmd(
* We have a subcommand to parse and act upon.
*/
- if (Tcl_GetIndexFromObj(interp, objv[1], focusOptions, "option", 0,
- &index) != TCL_OK) {
+ if (Tcl_GetIndexFromObjStruct(interp, objv[1], focusOptions,
+ sizeof(char), "option", 0, &index) != TCL_OK) {
return TCL_ERROR;
}
if (objc != 3) {