From 588e75f9d56152a514fee8643fec5605a4c26042 Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Tue, 3 Sep 2002 11:42:14 +0000
Subject: meuh gtk init

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

diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm
index 25e3b9f0a..9dbc66461 100644
--- a/perl-install/ugtk.pm
+++ b/perl-install/ugtk.pm
@@ -18,8 +18,7 @@ my $use_imlib;
 my $use_gnome;
 
 BEGIN {
-    require Gtk;
-    Gtk->init;
+    eval { require Gtk; Gtk->init };
     eval { require Gtk::Gdk::Pixbuf; Gtk::Gdk::Pixbuf->init };
     $use_pixbuf = $@ ? 0 : 1;
     eval { require Gtk::Gdk::ImlibImage; Gtk::Gdk::ImlibImage->init };
@@ -28,6 +27,8 @@ BEGIN {
     $use_gnome = $@ ? 0 : 1;
 }
 
+use Gtk;
+
 use c;
 use log;
 use common;
-- 
cgit v1.2.1