diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk.pm | 4 |
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); |