diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-02-17 13:34:29 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-02-17 13:34:29 +0000 |
commit | 6ecfc313fa0680e532dc38cf35f1261ccc4a6798 (patch) | |
tree | d13d8b22af7ac17e64675508ada02ee0f183fec8 /perl-install | |
parent | d101869e6a8052ef2bd1025b8c44b25f003c8477 (diff) | |
download | drakx-6ecfc313fa0680e532dc38cf35f1261ccc4a6798.tar drakx-6ecfc313fa0680e532dc38cf35f1261ccc4a6798.tar.gz drakx-6ecfc313fa0680e532dc38cf35f1261ccc4a6798.tar.bz2 drakx-6ecfc313fa0680e532dc38cf35f1261ccc4a6798.tar.xz drakx-6ecfc313fa0680e532dc38cf35f1261ccc4a6798.zip |
also ->hide in when a button is clicked in standalone
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/interactive/gtk.pm | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index 63f50da37..1514c5a45 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -424,20 +424,12 @@ sub ask_fromW { $w = Gtk2::Button->new(''); $w->signal_connect(clicked => sub { $get_all->(); - if ($::isWizard && !$::isInstall) { - $mainw->{rwindow}->set_sensitive(0); - } else { - $mainw->{rwindow}->hide; - } + $mainw->{rwindow}->hide; if (my $v = $e->{clicked_may_quit}()) { $mainw->{retval} = $v; Gtk2->main_quit; } - if ($::isWizard && !$::isInstall) { - $mainw->{rwindow}->set_sensitive(1); - } else { - $mainw->{rwindow}->show; - } + $mainw->{rwindow}->show; $set_all->(); }); $set = sub { $w->child->set(may_apply($e->{format}, $_[0])) }; |