summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
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);