common/tools/csvToSysDef.pl
changeset 335 15307a7772ea
parent 333 7b0a774a0c87
child 340 aee074ee2646
equal deleted inserted replaced
334:28c7ebde1768 335:15307a7772ea
    48 my $outTree;
    48 my $outTree;
    49 
    49 
    50 # For each package in CSV...
    50 # For each package in CSV...
    51 foreach my $package (@packages)
    51 foreach my $package (@packages)
    52 {
    52 {
       
    53 	# If the sources.csv does not include a sys def for this package, it doesn't get built
       
    54 	next unless $package->{sysdef};
    53 	warn "Warning: Package $package->{dst} does not appear on the local system\n" unless -d $package->{dst};
    55 	warn "Warning: Package $package->{dst} does not appear on the local system\n" unless -d $package->{dst};
    54 	# Look for the pkg defn in the root of the package tree
    56 	# Look for the pkg defn in the root of the package tree
    55 	my $pkgDef = "$package->{dst}/$package->{sysdef}";
    57 	my $pkgDef = "$package->{dst}/$package->{sysdef}";
    56 	if (!-f $pkgDef)
    58 	if (!-f $pkgDef)
    57 	{
    59 	{