From c74efdb64f25d0b45fe31a469a6bd8b11c6fe254 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 26 Mar 2012 18:21:30 +0000 Subject: (check_media) cleanup/simplify --- iurt2 | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'iurt2') diff --git a/iurt2 b/iurt2 index 0cb1af3..44d41b3 100755 --- a/iurt2 +++ b/iurt2 @@ -1292,9 +1292,9 @@ sub check_media { if (-f $synthesis_file) { plog("Parsing $synthesis_file"); if (open my $syn, "zcat $synthesis_file |") { - my @prov; local $_; while (<$syn>) { + my @prov; if (/^\@provides@(.*)/) { foreach my $p (split '@', $1) { if ($p =~ /([^[]+)(?:\[(.*)\])?/g) { @@ -1309,7 +1309,6 @@ sub check_media { foreach (@prov) { $pack_provide->{$_} = $name; } - @prov = (); } } } else { -- cgit v1.2.1