aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2009-01-08 13:46:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2009-01-08 13:46:19 +0000
commit624daa09dd9d85e62b972d5deccd352c17b7f4ee (patch)
treec9f84dec3afe05086d636dd0d3aa8ef3ae0c36da
parent493aa0592123f62a897f6af29e91bce2a6095ed5 (diff)
downloadperl-URPM-624daa09dd9d85e62b972d5deccd352c17b7f4ee.tar
perl-URPM-624daa09dd9d85e62b972d5deccd352c17b7f4ee.tar.gz
perl-URPM-624daa09dd9d85e62b972d5deccd352c17b7f4ee.tar.bz2
perl-URPM-624daa09dd9d85e62b972d5deccd352c17b7f4ee.tar.xz
perl-URPM-624daa09dd9d85e62b972d5deccd352c17b7f4ee.zip
make it clear the func is local
-rw-r--r--URPM.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/URPM.pm b/URPM.pm
index 8f21c0f..194ecfa 100644
--- a/URPM.pm
+++ b/URPM.pm
@@ -174,7 +174,7 @@ sub traverse_tag {
$count;
}
-sub parse_hdlist_or_synthesis {
+sub _parse_hdlist_or_synthesis {
my ($parse_func, $urpm, $file, %options) = @_;
my $previous_indice = @{$urpm->{depslist}};
@@ -194,8 +194,8 @@ sub parse_hdlist_or_synthesis {
();
}
}
-sub parse_synthesis { parse_hdlist_or_synthesis(\&parse_synthesis__XS, @_) }
-sub parse_hdlist { parse_hdlist_or_synthesis(\&parse_hdlist__XS, @_) }
+sub parse_synthesis { _parse_hdlist_or_synthesis(\&parse_synthesis__XS, @_) }
+sub parse_hdlist { _parse_hdlist_or_synthesis(\&parse_hdlist__XS, @_) }
sub add_macro {
my ($s) = @_;