diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-08-10 12:20:26 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-08-10 12:20:26 (GMT) |
| commit | 9bb2d0a7c84e436a757776b5c336cef61d71cda9 (patch) | |
| tree | 5eb0b4caefdd9dbc80e9ba897eb00d188a37a3d2 /library/ttk | |
| parent | 42c606df19acec46041dde207004d1c0fc6d5e77 (diff) | |
| parent | 3835b6555c9d2f6648f0ef2acc25efdd867e38b7 (diff) | |
| download | tk-9bb2d0a7c84e436a757776b5c336cef61d71cda9.zip tk-9bb2d0a7c84e436a757776b5c336cef61d71cda9.tar.gz tk-9bb2d0a7c84e436a757776b5c336cef61d71cda9.tar.bz2 | |
merge trunk
FossilOrigin-Name: 751a1f451c6b716ddf7d40e3692cc4c939a34b83
Diffstat (limited to 'library/ttk')
| -rw-r--r-- | library/ttk/notebook.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/ttk/notebook.tcl b/library/ttk/notebook.tcl index d424b6c..72b85e6 100644 --- a/library/ttk/notebook.tcl +++ b/library/ttk/notebook.tcl @@ -108,7 +108,7 @@ proc ttk::notebook::enableTraversal {nb} { bind $top <Control-Key-Next> {+ttk::notebook::TLCycleTab %W 1} bind $top <Control-Key-Prior> {+ttk::notebook::TLCycleTab %W -1} bind $top <Control-Key-Tab> {+ttk::notebook::TLCycleTab %W 1} - bind $top <Shift-Control-Key-Tab> {+ttk::notebook::TLCycleTab %W -1} + bind $top <Control-Shift-Key-Tab> {+ttk::notebook::TLCycleTab %W -1} catch { bind $top <Control-Key-ISO_Left_Tab> {+ttk::notebook::TLCycleTab %W -1} } @@ -170,7 +170,7 @@ proc ttk::notebook::EnclosingNotebook {w} { } # TLCycleTab -- -# toplevel binding procedure for Control-Tab / Shift-Control-Tab +# toplevel binding procedure for Control-Tab / Control-Shift-Tab # Select the next/previous tab in the nearest ancestor notebook. # proc ttk::notebook::TLCycleTab {w dir} { |