diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-09 11:03:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-09 11:03:00 (GMT) |
| commit | ebe99473e61961e6e6c4525ed9efe66f7c3de308 (patch) | |
| tree | b8267b8025bccdba2a79df3790081030fc9e28ec /library/menu.tcl | |
| parent | 32e3d179b323a56e40cf6289607a63ee9b7daa9a (diff) | |
| download | tk-ebe99473e61961e6e6c4525ed9efe66f7c3de308.zip tk-ebe99473e61961e6e6c4525ed9efe66f7c3de308.tar.gz tk-ebe99473e61961e6e6c4525ed9efe66f7c3de308.tar.bz2 | |
[Bug 3555644]: Better use of virtual events.
Diffstat (limited to 'library/menu.tcl')
| -rw-r--r-- | library/menu.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/menu.tcl b/library/menu.tcl index cc57532..8261e82 100644 --- a/library/menu.tcl +++ b/library/menu.tcl @@ -149,10 +149,10 @@ bind Menu <Return> { bind Menu <Escape> { tk::MenuEscape %W } -bind Menu <Left> { +bind Menu <<PrevChar>> { tk::MenuLeftArrow %W } -bind Menu <Right> { +bind Menu <<NextChar>> { tk::MenuRightArrow %W } bind Menu <Up> { |