fix missing brace :-(

This commit is contained in:
Steve McIntyre 2012-07-08 17:44:34 +00:00
parent 567ad9ed25
commit 69284b5972
1 changed files with 2 additions and 2 deletions

View File

@ -320,7 +320,7 @@ close LOG;
## BEGINNING OF SUBS
sub parse_package {
my $p;
my $p;
m/^Package: (\S+)\s*$/m and $p = $1;
$included{$p} = 0;
$packages{$p}{"Package"} = $p;
@ -342,7 +342,7 @@ sub parse_package {
} else {
$packages{$p}{"Component"} = "main";
}
}
sub read_depends {
my $i = shift; # Ref