From b4d7cb6df74a1f395e5eb4e4b1b1d2cd652c8a30 Mon Sep 17 00:00:00 2001
From: Yves Duret <yduret@mandriva.com>
Date: Tue, 4 Sep 2001 12:49:34 +0000
Subject: emebedded mode fix

---
 perl-install/my_gtk.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl-install/my_gtk.pm')

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);
-- 
cgit v1.2.1