From 0fca5662e7d4f0a8e2a9436ea860acde4b94ed05 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 20 Aug 2008 16:40:02 +0000
Subject: add formatList() (taken from MDK::Common)

---
 urpm/util.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'urpm')

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{$_} } @_ }
-- 
cgit v1.2.1