diff options
Diffstat (limited to 'library/dialog.tcl')
| -rw-r--r-- | library/dialog.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/dialog.tcl b/library/dialog.tcl index 26ec7e0..adea259 100644 --- a/library/dialog.tcl +++ b/library/dialog.tcl @@ -136,7 +136,7 @@ proc ::tk_dialog {w title text bitmap default args} { bind $w <Return> [list $w.button$default invoke] } bind $w <<PrevWindow>> [list bind $w <Return> {[tk_focusPrev %W] invoke}] - bind $w <Tab> [list bind $w <Return> {[tk_focusNext %W] invoke}] + bind $w <<NextWindow>> [list bind $w <Return> {[tk_focusNext %W] invoke}] # 5. Create a <Destroy> binding for the window that sets the # button variable to -1; this is needed in case something happens |