diff options
author | Yves Duret <yduret@mandriva.com> | 2001-09-04 12:49:34 +0000 |
---|---|---|
committer | Yves Duret <yduret@mandriva.com> | 2001-09-04 12:49:34 +0000 |
commit | b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30 (patch) | |
tree | 74a4c061e3d4d160453665c22adf9aa07033b5c4 /perl-install | |
parent | 190fe68ba0d4cb9536bb53257697b0a2ce0f09f9 (diff) | |
download | drakx-b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30.tar drakx-b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30.tar.gz drakx-b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30.tar.bz2 drakx-b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30.tar.xz drakx-b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30.zip |
emebedded mode fix
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/my_gtk.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index e11f3d3c8..64781733a 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -99,8 +99,7 @@ sub new { $::WizardTable->attach($o->{window}, 1, 2, 1, 2, {'fill', 'expand'}, {'fill', 'expand'}, 0, 0); } - $::isEmbedded or return $o; - $::Plug and return $o; + ($::isEmbedded && !$my_gtk::pop_it) or return $o; $o->{window} = new Gtk::HBox(0,0); $o->{rwindow} = $o->{window}; defined($::Plug) or $::Plug = new Gtk::Plug ($::XID); |