From da4d0440e4baf1cea30530a261c95dc01389b890 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 19 Jul 2005 13:24:01 +0000
Subject: do not draw a border around the main window while embedded

---
 perl-install/standalone/harddrake2   | 1 +
 perl-install/standalone/printerdrake | 1 +
 2 files changed, 2 insertions(+)

diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index 4a448ee08..10ca57045 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -238,6 +238,7 @@ $in = 'interactive'->vnew('su'); #require_root_capability();
 
 # Build the gui
 add_icon_path('/usr/share/pixmaps/harddrake2/');
+$::noborderWhenEmbedded = 1;
 $w = ugtk2->new(N("Harddrake2"));
 # fake diagnostics pragma:
 local $::main_window = $w->{real_window};
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake
index 2762126f5..be0716c79 100755
--- a/perl-install/standalone/printerdrake
+++ b/perl-install/standalone/printerdrake
@@ -113,6 +113,7 @@ my $stringsearch = '';
 
 sub HelpSystem() { exec("drakhelp --id printerdrake") unless fork() }
 
+$::noborderWhenEmbedded = 1;
 $us->{wnd} = ugtk2->new(N("%s Printer Management Tool", $distroname) . " " . $us->{VERSION});
 gtkset_size_request($us->{wnd}{rwindow}, 660, 460);
 
-- 
cgit v1.2.1