summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-12-12 09:20:15 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-12-12 09:20:15 +0000
commite931425b69901d83e46e019a1de72cba48883ed9 (patch)
treeaf318bc364d07117fb103472bae135def15ee90b /perl-install
parent93c3c7b163c881c6e0b3e3c559bdd2cdafb59298 (diff)
downloaddrakx-e931425b69901d83e46e019a1de72cba48883ed9.tar
drakx-e931425b69901d83e46e019a1de72cba48883ed9.tar.gz
drakx-e931425b69901d83e46e019a1de72cba48883ed9.tar.bz2
drakx-e931425b69901d83e46e019a1de72cba48883ed9.tar.xz
drakx-e931425b69901d83e46e019a1de72cba48883ed9.zip
simplify
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm6
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index fb338dbc0..becb5d112 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -84,8 +84,7 @@ sub gtkadd {
foreach (@_) {
my $l = $_;
ref $l or $l = Gtk2::Label->new($l);
- $w->add($l);
- $l->show;
+ $w->add(gtkshow($l));
}
$w
}
@@ -95,8 +94,7 @@ sub gtkappend {
foreach (@_) {
my $l = $_;
ref $l or $l = Gtk2::Label->new($l);
- $w->append($l);
- $l->show;
+ $w->append(gtkshow($l));
}
$w
}