diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-03 10:36:27 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-03 10:36:27 (GMT) |
| commit | bc08c53ff82b0535eb71676b94f0def77c0fa414 (patch) | |
| tree | adb49766bf9b945138c1cab4368d28bd7c2ab93a /library/demos | |
| parent | ab7e7f10137def475bf072146d6270b48a2efe49 (diff) | |
| parent | 8e6febd2151aacb1b563f09f2f3dbb5a2a25efde (diff) | |
| download | tk-bc08c53ff82b0535eb71676b94f0def77c0fa414.zip tk-bc08c53ff82b0535eb71676b94f0def77c0fa414.tar.gz tk-bc08c53ff82b0535eb71676b94f0def77c0fa414.tar.bz2 | |
Merge 8.5
Diffstat (limited to 'library/demos')
| -rw-r--r-- | library/demos/menu.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/demos/menu.tcl b/library/demos/menu.tcl index a788a65..6989523 100644 --- a/library/demos/menu.tcl +++ b/library/demos/menu.tcl @@ -63,7 +63,7 @@ if {[tk windowingsystem] eq "aqua"} { } foreach i {A B C D E F} { $m add command -label "Print letter \"$i\"" -underline 14 \ - -accelerator Meta+$i -command "puts $i" -accelerator $modifier+$i + -accelerator $modifier+$i -command "puts $i" bind $w <$modifier-[string tolower $i]> "puts $i" } |