diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-12-26 14:12:29 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-12-26 14:12:29 (GMT) |
commit | 2249d4ce05df4c841ada9e355a6c8c7c5118a9d9 (patch) | |
tree | 6fa2064c5afd0e3494e1718f2daf09093b99210f /library/menu.tcl | |
parent | c0fe491025571aa1b4af422d0122eaacdb944396 (diff) | |
download | tk-2249d4ce05df4c841ada9e355a6c8c7c5118a9d9.zip tk-2249d4ce05df4c841ada9e355a6c8c7c5118a9d9.tar.gz tk-2249d4ce05df4c841ada9e355a6c8c7c5118a9d9.tar.bz2 |
Fix [fec9e3879d]: Confusion regarding menu indexes "none" and {}. Also add some type-casts
Diffstat (limited to 'library/menu.tcl')
-rw-r--r-- | library/menu.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/menu.tcl b/library/menu.tcl index 3de7cc5..c334fd9 100644 --- a/library/menu.tcl +++ b/library/menu.tcl @@ -501,7 +501,7 @@ proc ::tk::MenuMotion {menu x y state} { } else { set Priv(menuDeactivatedTimer) \ [after $delay [list catch [list - $menu postcascade {}]]] + $menu postcascade none]]] } } } |