diff options
author | Ian Roxborough <irox@redhat.com> | 2001-09-09 19:49:03 +0000 |
---|---|---|
committer | Ian Roxborough <irox@redhat.com> | 2001-09-09 19:49:03 +0000 |
commit | 57e8350a3895a1579b77cc134d6d7d49b056678e (patch) | |
tree | 7584c16f5407dd1371b8290109b3b822067afd5a /itcl/iwidgets3.0.0/generic/shell.itk | |
parent | 7467241ff2a5cd6da7bbecb7111fc0dc3211c7de (diff) | |
download | gdb-57e8350a3895a1579b77cc134d6d7d49b056678e.tar.gz |
Itcl import for Tcl/Tk8.3 upgradeITCL_TCL_8_3
Diffstat (limited to 'itcl/iwidgets3.0.0/generic/shell.itk')
-rw-r--r-- | itcl/iwidgets3.0.0/generic/shell.itk | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/itcl/iwidgets3.0.0/generic/shell.itk b/itcl/iwidgets3.0.0/generic/shell.itk index 05a91e4f079..78ef19c53f9 100644 --- a/itcl/iwidgets3.0.0/generic/shell.itk +++ b/itcl/iwidgets3.0.0/generic/shell.itk @@ -240,8 +240,8 @@ body iwidgets::Shell::activate {} { } set _wait($this) 0 - wm deiconify $itk_component(hull) raise $itk_component(hull) + wm deiconify $itk_component(hull) tkwait visibility $itk_component(hull) if {$itk_option(-modality) == "application"} { |