summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-02-02 16:41:56 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-02-02 16:41:56 +0000
commitdaac91aaa5df64bdf91cc8cb080720a7f465af2d (patch)
treefc8a48621145ef3c2b579dda13621397d3e04533 /perl-install
parent878895a481e4148f04ebc1dec80068f6723f5c05 (diff)
downloaddrakx-backup-do-not-use-daac91aaa5df64bdf91cc8cb080720a7f465af2d.tar
drakx-backup-do-not-use-daac91aaa5df64bdf91cc8cb080720a7f465af2d.tar.gz
drakx-backup-do-not-use-daac91aaa5df64bdf91cc8cb080720a7f465af2d.tar.bz2
drakx-backup-do-not-use-daac91aaa5df64bdf91cc8cb080720a7f465af2d.tar.xz
drakx-backup-do-not-use-daac91aaa5df64bdf91cc8cb080720a7f465af2d.zip
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/my_gtk.pm3
1 files changed, 2 insertions, 1 deletions
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(@_)) }