From 48d7d284a65ece03c8918053147c2cbd11c78735 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 28 Oct 2009 14:53:39 +0000
Subject: do not "use" gtk modules, it might crash in text mode

---
 perl-install/fs/partitioning_wizard.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index 3d1d8d849..ad54cb1be 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -494,14 +494,15 @@ sub main {
     my $sol;
 
     if ($o->isa('interactive::gtk')) {
-        use mygtk2;
-    
+        require mygtk2;
+        import mygtk2 qw(gtknew);
+
         my $mainw = ugtk2->new(N("Partitioning"), %$o, if__($::main_window, transient => $::main_window));
         $mainw->{box_allow_grow} = 1;
         
         mygtk2::set_main_window_size($mainw->{rwindow});
         
-        use diskdrake::hd_gtk;
+        require diskdrake::hd_gtk;
         diskdrake::hd_gtk::load_theme();
 
         my $mainbox = Gtk2::VBox->new;
-- 
cgit v1.2.1