diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-12 20:32:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-12 20:32:05 (GMT) |
commit | f14346f41e7d066d72062435f39c621fd7b026c1 (patch) | |
tree | f0dd3d34c50b214137f26c296ab39127fc2fe032 /generic/tkMenu.c | |
parent | 6f7b389dd93395bc77e91a3bb5680aedf5d61a4c (diff) | |
download | tk-f14346f41e7d066d72062435f39c621fd7b026c1.zip tk-f14346f41e7d066d72062435f39c621fd7b026c1.tar.gz tk-f14346f41e7d066d72062435f39c621fd7b026c1.tar.bz2 |
Use (more efficient) Tcl_GetIntFromObj() in stead of Tcl_GetInt() in a few places where it makes sense.
Diffstat (limited to 'generic/tkMenu.c')
-rw-r--r-- | generic/tkMenu.c | 2 |
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; |