diff options
Diffstat (limited to 'lib/Youri/Upload/Reject/Clean.pm')
| -rw-r--r-- | lib/Youri/Upload/Reject/Clean.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lib/Youri/Upload/Reject/Clean.pm b/lib/Youri/Upload/Reject/Clean.pm index 7902472..ed2b99d 100644 --- a/lib/Youri/Upload/Reject/Clean.pm +++ b/lib/Youri/Upload/Reject/Clean.pm @@ -20,13 +20,9 @@ sub run { my ($self, $package, $errors, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - foreach my $replaced_package ( - $repository->get_replaced_packages($package, $target, $define) - ) { - my $file = $replaced_package->get_file(); - print "deleting file $file\n" if $self->{_verbose}; - unlink $file unless $self->{_test}; - } + my $file = $package->get_file(); + print "deleting file $file\n" if $self->{_verbose}; + unlink $file unless $self->{_test}; } =head1 COPYRIGHT AND LICENSE |