diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-08 07:57:20 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-08 07:57:20 (GMT) |
commit | c1d50f8302f80ab1939467c61bea379dd6035b1d (patch) | |
tree | 8f3c70c5dbf1d316e82522e520a455c6c902dd81 /library/ttk | |
parent | 78780eac5b472e24d78dd946ca88ec4dc6ddbef5 (diff) | |
parent | 3b31d9630f305b2f6b73e57e147541bc13aa1057 (diff) | |
download | tk-c1d50f8302f80ab1939467c61bea379dd6035b1d.zip tk-c1d50f8302f80ab1939467c61bea379dd6035b1d.tar.gz tk-c1d50f8302f80ab1939467c61bea379dd6035b1d.tar.bz2 |
Merge 8.6
Diffstat (limited to 'library/ttk')
-rw-r--r-- | library/ttk/menubutton.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/ttk/menubutton.tcl b/library/ttk/menubutton.tcl index 08b4a15..a245df8 100644 --- a/library/ttk/menubutton.tcl +++ b/library/ttk/menubutton.tcl @@ -224,11 +224,11 @@ proc ttk::menubutton::TransferGrab {mb} { # FindMenuEntry -- # Hack to support tk_optionMenus. # Returns the index of the menu entry with a matching -label, -# -1 if not found. +# "" if not found. # proc ttk::menubutton::FindMenuEntry {menu s} { set last [$menu index last] - if {$last eq "none"} { + if {$last eq "none" || $last eq ""} { return "" } for {set i 0} {$i <= $last} {incr i} { |