diff options
Diffstat (limited to 'generic/tkConfig.c')
| -rw-r--r-- | generic/tkConfig.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkConfig.c b/generic/tkConfig.c index b3e76d2..e3a8401 100644 --- a/generic/tkConfig.c +++ b/generic/tkConfig.c @@ -737,8 +737,8 @@ DoObjConfig( case TK_OPTION_STRING_TABLE: { int newValue; - if (Tcl_GetIndexFromObj(interp, valuePtr, - optionPtr->specPtr->clientData, + if (Tcl_GetIndexFromObjStruct(interp, valuePtr, + optionPtr->specPtr->clientData, sizeof(char), optionPtr->specPtr->optionName+1, 0, &newValue) != TCL_OK) { return TCL_ERROR; } |