From d09c70a202fc93ccdefd3409a211f9a628a6ba79 Mon Sep 17 00:00:00 2001 From: Michael Scherer Date: Mon, 25 Jul 2011 17:59:52 +0000 Subject: use copy instead of move ( or the cleaning will not be very effective ) --- modules/mirror_cleaner/files/orphans_cleaner.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/modules/mirror_cleaner/files/orphans_cleaner.pl b/modules/mirror_cleaner/files/orphans_cleaner.pl index 04a73fe2..ff4f12e5 100755 --- a/modules/mirror_cleaner/files/orphans_cleaner.pl +++ b/modules/mirror_cleaner/files/orphans_cleaner.pl @@ -64,7 +64,7 @@ foreach my $a ( @arches ) { ( $dest_rpm = $rpm ) =~ s/$path/$dest_path/; my $dir = dirname $dest_rpm; make_path $dir if not -d $dir; - copy($rpm, $dest_rpm) + move($rpm, $dest_rpm) } } } -- cgit v1.2.1