aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xsbosrcarch3
1 files changed, 1 insertions, 2 deletions
diff --git a/sbosrcarch b/sbosrcarch
index 76672e4..944e5ba 100755
--- a/sbosrcarch
+++ b/sbosrcarch
@@ -1267,13 +1267,12 @@ sub purge_pass_2_wanted {
return unless defined $file;
return if $keep_filenames{$file};
- print "purge $_\n";
$purgebytes += -s $_;
$purgefiles++;
my $namepath = name_dir($cat, $name) . "$file";
my $md5path = md5_dir(md5sum_file($namepath)) . "$file";
- warn ";;; unlink $namepath $md5path\n";
+ print "purge $namepath $md5path\n";
unlink $namepath;
unlink $md5path;
}