aboutsummaryrefslogtreecommitdiffstats
path: root/URPM/Query.pm
diff options
context:
space:
mode:
Diffstat (limited to 'URPM/Query.pm')
-rw-r--r--URPM/Query.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/URPM/Query.pm b/URPM/Query.pm
index 14256a4..15cbe29 100644
--- a/URPM/Query.pm
+++ b/URPM/Query.pm
@@ -21,7 +21,7 @@ sub tag2id {
sub query_pkg {
my (undef, $pkg, $query) = @_;
my @tags = map {
- [ $pkg->get_tag(tag2id($_)) ]
+ [ $pkg->get_tag(tag2id($_)) ];
} $query =~ m/\%\{([^{}]*)\}*/g;
$query =~ s/\%\{[^{}]*\}/%s/g;
@@ -29,12 +29,12 @@ sub query_pkg {
$query =~ s/\\t/\t/g;
my ($max, @res) = 0;
- foreach (@tags) { $max < $#{$_} and $max = $#{$_} };
+ foreach (@tags) { $max < $#{$_} and $max = $#{$_} }
foreach my $i (0 .. $max) {
- push(@res, sprintf($query, map { ${$_}[ $#{$_} < $i ? $#{$_} : $i ] } @tags));
+ push @res, sprintf($query, map { ${$_}[ $#{$_} < $i ? $#{$_} : $i] } @tags);
}
- @res
+ @res;
}
1;