summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/ugtk.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm
index 5c05a31a7..b5042aa30 100644
--- a/perl-install/ugtk.pm
+++ b/perl-install/ugtk.pm
@@ -80,9 +80,10 @@ sub gdkpixmap {
sub gtkadd {
my $w = shift;
foreach (@_) {
- ref $_ or $_ = new Gtk::Label($_);
- $w->add($_);
- $_->show;
+ my $l = $_;
+ ref $l or $l = new Gtk::Label($l);
+ $w->add($l);
+ $l->show;
}
$w
}