From 064a6acd00a752f590cc4f6bb88c699740901b74 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 30 Jul 2008 15:28:53 +0000
Subject: (_gtk__MagicWindow) remove ugly Frames around windows now that
 matchbox takes care of drawing real window borders

---
 perl-install/mygtk2.pm | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

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

diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index b36b1a6cd..28fb0f0a1 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -649,10 +649,7 @@ sub _gtk__MagicWindow {
     }
 
     if ($pop_it) {
-	$opts->{child} = $::isInstall ?
-	  gtknew('Frame', shadow_type => 'out', 
-		 child => gtknew('Frame', shadow_type => 'none', border_width => 3, child => $sub_child)) :
-	  $sub_child;
+	$opts->{child} = $sub_child;
 
 	$w = _create_Window($opts);
     } else {
@@ -678,7 +675,7 @@ sub _gtk__MagicWindow {
 		sync($::WizardWindow);
 	    } else {
 		add2hash($opts, {
-		    child => gtknew('Frame', shadow_type => 'out', child => $::WizardTable),
+		    child => $::WizardTable,
 		});
 		$::WizardWindow = _create_Window($opts);
 	    }
-- 
cgit v1.2.1