Tidy: Rewrite compactclist() to be more compact (no pun intended).

1 files changed, 1 insertions, 4 deletions

diff --git a/localdebpool b/localdebpool
index a2cd506..e6723a4 100755
--- a/localdebpool
+++ b/localdebpool
@@ -19,10 +19,7 @@ debugprint() {
 }
 
 compactlist() {
-	( for item in $@; do echo $item; done ) \
-		| sort -u \
-		| tr '\n' ' ' \
-		| sed 's/[[:space:]]\+/ /g; s/^[[:space:]]//; s/[[:space:]]$//'
+	echo "$*" | perl -nlE "say for /(\S+)/g" | sort -u
 }
 
 regexfromlist() {