diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-01 23:43:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-01 23:43:43 (GMT) |
| commit | fb90e616387370c03c9651085685fcdfe4899399 (patch) | |
| tree | 8f7be74c8a517aafa6b8b60dd2bc53922d3570c9 /library | |
| parent | 5b17775ceec76475fc09958fe95ea3463bf0d4a0 (diff) | |
| download | tk-fb90e616387370c03c9651085685fcdfe4899399.zip tk-fb90e616387370c03c9651085685fcdfe4899399.tar.gz tk-fb90e616387370c03c9651085685fcdfe4899399.tar.bz2 | |
missing ')'
Diffstat (limited to 'library')
| -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 1fb6e78..f6ec29a 100644 --- a/library/menu.tcl +++ b/library/menu.tcl @@ -658,7 +658,7 @@ proc ::tk::MenuInvoke {w buttonRelease} { } } else { set activeindex [$w index active] - if {$Priv(popup) eq "" || (($activeindex ne "none") && ($activeindex >= 0)} { + if {($Priv(popup) eq "") || (($activeindex ne "none") && ($activeindex >= 0))} { MenuUnpost $w } uplevel #0 [list $w invoke active] |