common/tools/csvToSysDef.pl
changeset 337 1d3a752f6723
parent 335 15307a7772ea
child 340 aee074ee2646
equal deleted inserted replaced
336:08d0bd91ad20 337:1d3a752f6723
    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 	{