summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-03 07:40:43 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-03 07:40:43 +0000
commitfde55790c3cec482adaf066cd08e16c0bf20df83 (patch)
tree182894e75bf534e62dd9f4d0a84147c1107ecc43 /perl-install
parent30328f985955eec7b37cd766f56cb58e50876134 (diff)
downloaddrakx-fde55790c3cec482adaf066cd08e16c0bf20df83.tar
drakx-fde55790c3cec482adaf066cd08e16c0bf20df83.tar.gz
drakx-fde55790c3cec482adaf066cd08e16c0bf20df83.tar.bz2
drakx-fde55790c3cec482adaf066cd08e16c0bf20df83.tar.xz
drakx-fde55790c3cec482adaf066cd08e16c0bf20df83.zip
(gtkappend_page) name parameters, enabling perl_checker to check callers' call
signature
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 591b57d08..2af809091 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -134,9 +134,9 @@ sub gtkappenditems {
# append page to a notebook
sub gtkappend_page {
- my $w = shift;
- $w->append_page(@_);
- $w
+ my ($notebook, $page, $title) = @_;
+ $notebook->append_page($page, $title);
+ $notebook;
}
sub gtkentry {