summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-17 13:34:29 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-17 13:34:29 +0000
commit6ecfc313fa0680e532dc38cf35f1261ccc4a6798 (patch)
treed13d8b22af7ac17e64675508ada02ee0f183fec8 /perl-install
parentd101869e6a8052ef2bd1025b8c44b25f003c8477 (diff)
downloaddrakx-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.pm12
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])) };