diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2003-02-21 17:18:06 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-02-21 17:18:06 +0000 |
| commit | ea32cf09806a3642349cad6bbd524acf6f3b7392 (patch) | |
| tree | 8759e351b4ae5cf4ce2abb43a1080d6668f199d3 /perl-install | |
| parent | 3c6d0e9bf117e1554eea560e7900b3c5b197ed68 (diff) | |
| download | drakx-ea32cf09806a3642349cad6bbd524acf6f3b7392.tar drakx-ea32cf09806a3642349cad6bbd524acf6f3b7392.tar.gz drakx-ea32cf09806a3642349cad6bbd524acf6f3b7392.tar.bz2 drakx-ea32cf09806a3642349cad6bbd524acf6f3b7392.tar.xz drakx-ea32cf09806a3642349cad6bbd524acf6f3b7392.zip | |
embedded should segfault a bit less if I don't let the embedded
window creation destroy the destroy handler
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk2.pm | 4 |
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 { |