summaryrefslogtreecommitdiffstats
path: root/library/ttk/notebook.tcl
diff options
context:
space:
mode:
authordas <das>2007-02-24 09:15:07 (GMT)
committerdas <das>2007-02-24 09:15:07 (GMT)
commit33432c59af4ba34defb03b255dad42030e7db41e (patch)
treef3af2a8683aa3f31e362afb4b816c5bddc7b5e13 /library/ttk/notebook.tcl
parente74029a331aeefd4c472110e73d2a57e1e19c6a5 (diff)
downloadtk-33432c59af4ba34defb03b255dad42030e7db41e.zip
tk-33432c59af4ba34defb03b255dad42030e7db41e.tar.gz
tk-33432c59af4ba34defb03b255dad42030e7db41e.tar.bz2
inverted logic in previous commit
Diffstat (limited to 'library/ttk/notebook.tcl')
-rw-r--r--library/ttk/notebook.tcl6
1 files changed, 3 insertions, 3 deletions
diff --git a/library/ttk/notebook.tcl b/library/ttk/notebook.tcl
index 79ed741..4fe58cc 100644
--- a/library/ttk/notebook.tcl
+++ b/library/ttk/notebook.tcl
@@ -1,5 +1,5 @@
#
-# $Id: notebook.tcl,v 1.3 2007/02/24 00:02:09 hobbs Exp $
+# $Id: notebook.tcl,v 1.4 2007/02/24 09:15:07 das Exp $
#
# Bindings for TNotebook widget
#
@@ -108,10 +108,10 @@ proc ttk::notebook::enableTraversal {nb} {
bind $top <Control-Key-ISO_Left_Tab> {+ttk::notebook::TLCycleTab %W -1}
}
if {[tk windowingsystem] eq "aqua"} {
- bind $top <Alt-KeyPress> \
+ bind $top <Option-KeyPress> \
+[list ttk::notebook::MnemonicActivation $top %K]
} else {
- bind $top <Option-KeyPress> \
+ bind $top <Alt-KeyPress> \
+[list ttk::notebook::MnemonicActivation $top %K]
}
bind $top <Destroy> {+ttk::notebook::TLCleanup %W}