From 88470ddf129d2c8f193e3450a100503a121a944d Mon Sep 17 00:00:00 2001
From: Sebastien Dupont <sdupont@mandriva.com>
Date: Mon, 10 Dec 2001 11:25:57 +0000
Subject: fix libdrakx path problem.

---
 perl-install/standalone/drakfont | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

(limited to 'perl-install/standalone/drakfont')

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 8b93d08b3..834e8c0fb 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -80,7 +80,7 @@
 
 
 use Gtk;
-use lib qw(..);
+use lib qw(/usr/lib/libDrakX );
 use interactive;
 use standalone;
 use my_gtk qw(:helpers :wrappers);
@@ -531,9 +531,7 @@ sub display_error {
 sub interactive_mode {
     my $font_sel;
     $interactive = 1;
-    
     init Gtk;
-    
     my $window1 = $::isEmbedded ? new Gtk::Plug ($::XID) : new Gtk::Window -toplevel;
     $window1->signal_connect (delete_event => sub { Gtk->exit(0) });
     $window1->set_position(1);
@@ -575,8 +573,7 @@ sub interactive_mode {
     $central_widget = \$font_sel;
     $window1->show_all;
     $window1->realize;
-    $window1->show_all();
-    
+    $window1->show_all();    
     Gtk->main;
     Gtk->exit(0);
 }
-- 
cgit v1.2.1