diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-10 11:28:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-10 11:28:09 (GMT) |
| commit | b883e880976a068be12cf29c379b97be348ea79c (patch) | |
| tree | 058e10db403e77b5641b299ae236b7d4399f366c /library/ttk | |
| parent | 4170dadb2c17a28bfbe04fcdba16d8e1038616df (diff) | |
| download | tk-b883e880976a068be12cf29c379b97be348ea79c.zip tk-b883e880976a068be12cf29c379b97be348ea79c.tar.gz tk-b883e880976a068be12cf29c379b97be348ea79c.tar.bz2 | |
Shift-Control -> Control-Shift, for consisancy everywhere
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} { |