summaryrefslogtreecommitdiffstats
path: root/generic/tkImgPhoto.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-02-27 12:36:56 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-02-27 12:36:56 (GMT)
commitb83ed80002d8d8eb676c9f7c81a794e8216e3498 (patch)
treec60953cf292d7784e416ed6fd0555d89d2e6f2c3 /generic/tkImgPhoto.c
parentfb81bb7d6255f5040661d59559edf32bc997bd6d (diff)
downloadtk-b83ed80002d8d8eb676c9f7c81a794e8216e3498.zip
tk-b83ed80002d8d8eb676c9f7c81a794e8216e3498.tar.gz
tk-b83ed80002d8d8eb676c9f7c81a794e8216e3498.tar.bz2
Eliminate all Tcl_GetIndexFromObj calls, which is only a thin wrapper around Tcl_GetIndexFromObjStruct.
Diffstat (limited to 'generic/tkImgPhoto.c')
-rw-r--r--generic/tkImgPhoto.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tkImgPhoto.c b/generic/tkImgPhoto.c
index 4fcc3db..7fd84d9 100644
--- a/generic/tkImgPhoto.c
+++ b/generic/tkImgPhoto.c
@@ -420,8 +420,8 @@ ImgPhotoCmd(
return TCL_ERROR;
}
- if (Tcl_GetIndexFromObj(interp, objv[1], photoOptions, "option", 0,
- &index) != TCL_OK) {
+ if (Tcl_GetIndexFromObjStruct(interp, objv[1], photoOptions,
+ sizeof(char *), "option", 0, &index) != TCL_OK) {
return TCL_ERROR;
}
@@ -1145,8 +1145,8 @@ ImgPhotoCmd(
Tcl_WrongNumArgs(interp, 2, objv, "option ?arg ...?");
return TCL_ERROR;
}
- if (Tcl_GetIndexFromObj(interp, objv[2], photoTransOptions, "option",
- 0, &index) != TCL_OK) {
+ if (Tcl_GetIndexFromObjStruct(interp, objv[2], photoTransOptions,
+ sizeof(char *) , "option", 0, &index) != TCL_OK) {
return TCL_ERROR;
}
@@ -1565,8 +1565,8 @@ ParseSubcommandOptions(
goto oneValueRequired;
}
index++;
- if (Tcl_GetIndexFromObj(interp, objv[index], compositingRules,
- "compositing rule", 0, &optPtr->compositingRule)
+ if (Tcl_GetIndexFromObjStruct(interp, objv[index], compositingRules,
+ sizeof(char *), "compositing rule", 0, &optPtr->compositingRule)
!= TCL_OK) {
return TCL_ERROR;
}