aboutsummaryrefslogtreecommitdiffstats
path: root/ulri
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2014-04-19 12:58:53 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2014-04-19 12:59:04 +0200
commita231645f12e640171070a9f7fbcc737fd58afe29 (patch)
tree07488567c1677164b0ea8a1028958218735189a5 /ulri
parent4edab9788a284886731f41a1bb522ba5d814a142 (diff)
downloadiurt-a231645f12e640171070a9f7fbcc737fd58afe29.tar
iurt-a231645f12e640171070a9f7fbcc737fd58afe29.tar.gz
iurt-a231645f12e640171070a9f7fbcc737fd58afe29.tar.bz2
iurt-a231645f12e640171070a9f7fbcc737fd58afe29.tar.xz
iurt-a231645f12e640171070a9f7fbcc737fd58afe29.zip
simplify using cat*()
Diffstat (limited to 'ulri')
-rwxr-xr-xulri10
1 files changed, 2 insertions, 8 deletions
diff --git a/ulri b/ulri
index 0e8f36e..8c5163a 100755
--- a/ulri
+++ b/ulri
@@ -280,14 +280,8 @@ sub todo_func {
if ($r =~ /(\d{14}\.\w+\.\w+\.\d+)_.*\.deps$/) {
my $prefix = $1;
- my @deps;
-
- open my $FILE, "<$todo/$f/$m/$s/$r";
- while (my $line = <$FILE>) {
- chomp $line;
- plog('DEBUG', "Adding dependency $line ($prefix)");
- push @deps,$line;
- }
+ my @deps = map { chomp(); $_ } cat_("$todo/$f/$m/$s/$r");
+ plog('DEBUG', "Adding dependency $_ ($prefix)") foreach @deps;
$pkg_tree{$prefix}{deps} = \@deps;
}