From df3b02bdf073859d3ea90b51ece854ce6622558a Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 24 Sep 2008 15:03:38 +0000 Subject: (gtkcreate_pixbuf) perl_checker cleanup --- perl-install/ugtk2.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/ugtk2.pm') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index bed37c0d9..1eb12adc6 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -623,7 +623,7 @@ sub gtkcreate_img { # use it if you want to draw an image onto a drawingarea sub gtkcreate_pixbuf { my ($file, $o_size) = @_; - gtknew('Pixbuf', file => $_[0], if_($o_size, size => $o_size)); + gtknew('Pixbuf', file => $file, if_($o_size, size => $o_size)); } sub gtktext_append { gtktext_insert(@_, append => 1) } -- cgit v1.2.1