summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-09-02 14:31:13 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-09-02 14:31:13 +0000
commiteebddd94ac89cb855384f49724d8cf3df4777b86 (patch)
treeb34056f40e5048f9cff8a233dae75e3bd9670cc0 /perl-install
parent47a34688d44f0d7639c912dfefca91c3f67adfa6 (diff)
downloaddrakx-eebddd94ac89cb855384f49724d8cf3df4777b86.tar
drakx-eebddd94ac89cb855384f49724d8cf3df4777b86.tar.gz
drakx-eebddd94ac89cb855384f49724d8cf3df4777b86.tar.bz2
drakx-eebddd94ac89cb855384f49724d8cf3df4777b86.tar.xz
drakx-eebddd94ac89cb855384f49724d8cf3df4777b86.zip
kill glib warnings
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm
index 9e6a885ec..90f76ff03 100644
--- a/perl-install/ugtk.pm
+++ b/perl-install/ugtk.pm
@@ -18,6 +18,8 @@ my $use_imlib;
my $use_gnome;
BEGIN {
+ 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 };
@@ -516,8 +518,6 @@ sub gtkicons_labels_widget {
$dbl_area->{state} = $darea->{state};
fill_tiled($darea, $dbl_area, $background, $x_back2, $y_back2, $dx, $dy);
# $darea->{state} ? $icon_h : $icon
- $darea->window->set_back_pixmap($background,0);
-
$pixbuf->render_to_drawable($dbl_area, $darea->style->fg_gc('normal'), 0, 0, 0, 0,
$pixbuf->get_width, $pixbuf->get_height, 'normal', 0, 0);