summaryrefslogtreecommitdiffstats
path: root/library/menu.tcl
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-03-27 11:35:58 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-03-27 11:35:58 (GMT)
commit6b4003931a14f890e04b620d349878f3f09a3b4d (patch)
treed4116ef6a4c8db9adbdca6d52cd507517b4986d7 /library/menu.tcl
parent45bc4b8ed5e03bb50fa2d084bc505d27fadd5db7 (diff)
parent11459a5b8cef448ab00e3d558f47f6c408019784 (diff)
downloadtk-6b4003931a14f890e04b620d349878f3f09a3b4d.zip
tk-6b4003931a14f890e04b620d349878f3f09a3b4d.tar.gz
tk-6b4003931a14f890e04b620d349878f3f09a3b4d.tar.bz2
[Bug 3608074]: Add <<Invoke>> bindings to Button's, Listbox and Menu.
Document <<Invoke>>, <<ThemeChanged>>, <<EnteredChild>> (ttk_pandedwindow only) and <<Increment/Decrement>> (ttk_spinbox only)
Diffstat (limited to 'library/menu.tcl')
-rw-r--r--library/menu.tcl7
1 files changed, 7 insertions, 0 deletions
diff --git a/library/menu.tcl b/library/menu.tcl
index cc57532..f133c87 100644
--- a/library/menu.tcl
+++ b/library/menu.tcl
@@ -106,6 +106,10 @@ bind Menubutton <space> {
tk::MbPost %W
tk::MenuFirstEntry [%W cget -menu]
}
+bind Menubutton <<Invoke>> {
+ tk::MbPost %W
+ tk::MenuFirstEntry [%W cget -menu]
+}
# Must set focus when mouse enters a menu, in order to allow
# mixed-mode processing using both the mouse and the keyboard.
@@ -143,6 +147,9 @@ bind Menu <ButtonRelease> {
bind Menu <space> {
tk::MenuInvoke %W 0
}
+bind Menu <<Invoke>> {
+ tk::MenuInvoke %W 0
+}
bind Menu <Return> {
tk::MenuInvoke %W 0
}