summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index ae696e26b..651ffea10 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -820,8 +820,6 @@ sub new {
$::WizardTable->attach($o->{window}, 0, 2, 1, 2, ['fill', 'expand'], ['fill', 'expand'], 0, 0);
}
- $o->{rwindow}->signal_connect(destroy => sub { $o->{destroyed} = 1 });
-
if ($::isEmbedded && !$o->{pop_it}) {
$o->{isEmbedded} = 1;
$o->{window} = new Gtk2::HBox(0,0);
@@ -836,6 +834,8 @@ sub new {
$::WizardTable->attach($o->{window}, 0, 2, 1, 2, ['fill', 'expand'], ['fill', 'expand'], 0, 0);
$::WizardTable->show;
}
+ $o->{rwindow}->signal_connect(destroy => sub { $o->{destroyed} = 1 });
+
$o;
}
sub main {