equal
deleted
inserted
replaced
55 # For each package in CSV... |
55 # For each package in CSV... |
56 foreach my $package (@packages) |
56 foreach my $package (@packages) |
57 { |
57 { |
58 warn "Warning: Package $package->{dst} does not appear on the local system\n" unless -d $package->{dst}; |
58 warn "Warning: Package $package->{dst} does not appear on the local system\n" unless -d $package->{dst}; |
59 $package->{dst} =~ s{^/}{}g; |
59 $package->{dst} =~ s{^/}{}g; |
60 if ($package->{source} =~ m{/(sfl|epl)/sf/([^/]+)/([^/]+)}) |
60 if ($package->{source} =~ m{/(sfl|oss)/sf/([^/]+)/([^/]+)}) |
61 { |
61 { |
62 push @{$zipConfig->{config}->{config}->{src}->{config}->{$1}->{config}}, |
62 push @{$zipConfig->{config}->{config}->{src}->{config}->{$1}->{config}}, |
63 { |
63 { |
64 set => |
64 set => |
65 [ |
65 [ |