dupemerge: clean up stats_blob output if --progress

[dupemerge] / faster-dupemerge

diff --git a/faster-dupemerge b/faster-dupemerge
index aa8b142ceeab5bc2390aa7fcc4abef9a10719cc5..fe433f79283d5646cb5c3781aae75505f6710940 100755 (executable)
--- a/faster-dupemerge
+++ b/faster-dupemerge
@@ -637,6 +637,7 @@ if ($humane) {
 
 $stats_blob =~ s/([^\n]*\n[^\n]*? )(\s+)( [^\n]*\n)/$1 . ('.' x length($2)) . $3/oemg;
 
+print STDERR "\n" if $progress;
 print STDERR $stats_blob;
 
 exit(0);