diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-08 06:23:40 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-08 06:23:40 (GMT) |
| commit | dc2c36cea500db6933ade16c3252cef0a66ab26d (patch) | |
| tree | 0b7650bc7c53e1dca25ec6facfe279368c9046a6 /library/menu.tcl | |
| parent | 6f2824501d0987043c6456d5ab00adbb4300b682 (diff) | |
| download | tk-dc2c36cea500db6933ade16c3252cef0a66ab26d.zip tk-dc2c36cea500db6933ade16c3252cef0a66ab26d.tar.gz tk-dc2c36cea500db6933ade16c3252cef0a66ab26d.tar.bz2 | |
Simplify throughout: ButtonPress -> Button, KeyPress -> Key (or remove it because it is the default anyway)
Use 'in' operator in stead of 'lsearch -exact' when possible
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 9d6370a..c4991f8 100644 --- a/library/menu.tcl +++ b/library/menu.tcl @@ -138,7 +138,7 @@ bind Menu <Leave> { bind Menu <Motion> { tk::MenuMotion %W %x %y %s } -bind Menu <ButtonPress> { +bind Menu <Button> { tk::MenuButtonDown %W } bind Menu <ButtonRelease> { |