diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-16 08:16:45 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-16 08:16:45 (GMT) |
commit | 9b2958c5803abffb4174f28adac63058409ded8e (patch) | |
tree | 4029abe2d063c04a3e8a028fadf1026dc2fafa1d /generic/tkMenu.c | |
parent | 85721c6804689f38b266333d42fba5865907961a (diff) | |
parent | 487b808fa7ad1096e9ee4112a719c8ed3cd45ff8 (diff) | |
download | tk-9b2958c5803abffb4174f28adac63058409ded8e.zip tk-9b2958c5803abffb4174f28adac63058409ded8e.tar.gz tk-9b2958c5803abffb4174f28adac63058409ded8e.tar.bz2 |
Merge 8.6
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 4d81978..1b38444 100644 --- a/generic/tkMenu.c +++ b/generic/tkMenu.c @@ -2169,7 +2169,7 @@ TkGetMenuIndex( Tcl_Obj *labelPtr = menuPtr->entries[i]->labelPtr; const char *label = (labelPtr == NULL) ? NULL : Tcl_GetString(labelPtr); - if ((label != NULL) && (Tcl_StringMatch(label, string))) { + if ((label != NULL) && (Tcl_StringCaseMatch(label, string, 0))) { *indexPtr = i; goto success; } |