From daac91aaa5df64bdf91cc8cb080720a7f465af2d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 2 Feb 2001 16:41:56 +0000 Subject: *** empty log message *** --- perl-install/my_gtk.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/my_gtk.pm') diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index 73d989a5b..b3f96eb36 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -264,7 +264,8 @@ sub gtkctree_children { sub gtkcreate_xpm { my ($w, $f) = @_; - Gtk::Gdk::Pixmap->create_from_xpm($w->window, $w->style->bg('normal'), $f) or die "gtkcreate_xpm: missing pixmap file $f"; + my @l = Gtk::Gdk::Pixmap->create_from_xpm($w->window, $w->style->bg('normal'), $f) or die "gtkcreate_xpm: missing pixmap file $f"; + @l; } sub xpm_d { my $w = shift; Gtk::Gdk::Pixmap->create_from_xpm_d($w->window, undef, @_) } sub gtkxpm { new Gtk::Pixmap(gtkcreate_xpm(@_)) } -- cgit v1.2.1