summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-04-11 23:49:20 +0000
committerdamien <damien@mandriva.com>2001-04-11 23:49:20 +0000
commitbfb93b8300dbb59f7e51ee6da982cc0d54c988cf (patch)
tree7254c3e2d440be35ea624f9782f2aeae33ad95b3 /perl-install/my_gtk.pm
parentc0497a3d1b9cd041f2215632a905e7ab24ceb489 (diff)
downloaddrakx-bfb93b8300dbb59f7e51ee6da982cc0d54c988cf.tar
drakx-bfb93b8300dbb59f7e51ee6da982cc0d54c988cf.tar.gz
drakx-bfb93b8300dbb59f7e51ee6da982cc0d54c988cf.tar.bz2
drakx-bfb93b8300dbb59f7e51ee6da982cc0d54c988cf.tar.xz
drakx-bfb93b8300dbb59f7e51ee6da982cc0d54c988cf.zip
no setmodal 0 if wizard
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index fba9604c3..77f57ce97 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -40,7 +40,7 @@ sub new {
$o->_create_window($title);
while (my $e = shift @tempory::objects) { $e->destroy }
foreach (@interactive::objects) {
- $_->{rwindow}->set_modal(0);
+ $::isWizard or $_->{rwindow}->set_modal(0);
}
push @interactive::objects, $o if !$opts{no_interactive_objects};
$o->{rwindow}->set_position('center_always') if $::isStandalone;