diff options
| -rwxr-xr-x | emi | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -139,8 +139,8 @@ foreach my $prefix (keys %pkg_tree) { } else { # should send a mail or something print {$run{LOG}} "$program_name: upload failed, rejecting files in $reject/$path/\n"; - foreach my $rpm (@packages) { - my $err = link $rpm, "$reject/$path/"; + foreach my $rpm (@{$pkg_tree{$prefix}{rpms}}) { + my $err = link "$done/$path/${prefix}_$rpm", "$reject/$path/${prefix}_$rpm"; print {$run{LOG}} "ERROR $program_name: link of $rpm failed ($!)\n" } link "$done/$path/$prefix.youri", "$reject/$path/$prefix.youri" |