summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-08-01 12:44:34 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-08-01 12:44:34 +0000
commit4b469c8f9c0a667ecae61055071f6dd9ce790ba2 (patch)
tree9ff4b686a3a1d94de12d5d7a09bebb489c2d6e2b /perl-install/ugtk.pm
parent554a63df303f8e513cef57970ea166abada635a9 (diff)
downloaddrakx-4b469c8f9c0a667ecae61055071f6dd9ce790ba2.tar
drakx-4b469c8f9c0a667ecae61055071f6dd9ce790ba2.tar.gz
drakx-4b469c8f9c0a667ecae61055071f6dd9ce790ba2.tar.bz2
drakx-4b469c8f9c0a667ecae61055071f6dd9ce790ba2.tar.xz
drakx-4b469c8f9c0a667ecae61055071f6dd9ce790ba2.zip
remove INFO warnings
Diffstat (limited to 'perl-install/ugtk.pm')
-rw-r--r--perl-install/ugtk.pm3
1 files changed, 0 insertions, 3 deletions
diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm
index ab4961614..f60e678b2 100644
--- a/perl-install/ugtk.pm
+++ b/perl-install/ugtk.pm
@@ -752,7 +752,6 @@ sub gtkcreate_png {
$f =~ m|.png$| or $f = "$f.png";
if ($f !~ /\//) { -e "$_/$f" and $f = "$_/$f", last foreach icon_paths() }
if ($use_pixbuf) {
- print " - ugtk - INFO : rendering using gdkpixbuff\n";
my $pixbuf = Gtk::Gdk::Pixbuf->new_from_file($f) or die "gtkcreate_png: missing png file $f";
my ($width, $height) = ($pixbuf->get_width(), $pixbuf->get_height);
my $rw = gtkroot();
@@ -762,12 +761,10 @@ sub gtkcreate_png {
$pixbuf->render_threshold_alpha($bit, 0, 0, 0, 0, $width, $height, '127');
return ($pix, $bit);
} elsif ($use_imlib) {
- print " - ugtk - INFO : rendering using imlib1\n";
my $im = Gtk::Gdk::ImlibImage->load_image($f) or die "gtkcreate_png: missing png file $f";
$im->render($im->rgb_width, $im->rgb_height);
return ($im->move_image(), $im->move_mask);
} else {
- print " - ugtk - CRITICAL : no suitable library found\n";
die "gtkcreate_png: cannot find a suitable library for rendering png (imlib1 or gdk_pixbuf)";
}
}