summaryrefslogtreecommitdiffstats
path: root/generic/tkMenu.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tkMenu.c')
-rw-r--r--generic/tkMenu.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkMenu.c b/generic/tkMenu.c
index d51febb..318930f 100644
--- a/generic/tkMenu.c
+++ b/generic/tkMenu.c
@@ -2144,7 +2144,7 @@ TkGetMenuIndex(
}
if (isdigit(UCHAR(string[0]))) {
- if (Tcl_GetInt(interp, string, &i) == TCL_OK) {
+ if (Tcl_GetIntFromObj(interp, objPtr, &i) == TCL_OK) {
if (i >= menuPtr->numEntries) {
if (lastOK) {
i = menuPtr->numEntries;