summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--urpm/util.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/urpm/util.pm b/urpm/util.pm
index 4c51d2ff..65fb5f77 100644
--- a/urpm/util.pm
+++ b/urpm/util.pm
@@ -146,6 +146,10 @@ sub begins_with {
my ($s, $prefix) = @_;
index($s, $prefix) == 0;
}
+sub formatList {
+ my $nb = shift;
+ join(", ", @_ <= $nb ? @_ : (@_[0..$nb-1], '...'));
+}
sub put_in_hash { my ($a, $b) = @_; while (my ($k, $v) = each %{$b || {}}) { $a->{$k} = $v } $a }
sub uniq { my %l; $l{$_} = 1 foreach @_; grep { delete $l{$_} } @_ }