From: Zygo Blaxell Date: Sat, 9 Jan 2010 04:20:39 +0000 (-0500) Subject: Clean up output if --progress active and bogon file encountered X-Git-Tag: dm6-0.20100514~14 X-Git-Url: http://git.hungrycats.org/cgi-bin/gitweb.cgi?p=dupemerge;a=commitdiff_plain;h=f972903a36f186e1083390d396c57a2e4b6b3bb5 Clean up output if --progress active and bogon file encountered --- diff --git a/faster-dupemerge b/faster-dupemerge index 683ed32..714d474 100755 --- a/faster-dupemerge +++ b/faster-dupemerge @@ -355,6 +355,7 @@ hash_file: foreach my $filename (sort keys(%{$inode_to_file_name{$candidate}})) { print STDERR "\t\tDigesting file $filename\n" if $debug; if ((-l $filename) || ! -f _) { + print STDERR "\n" if $progress; warn "Bogon file " . tick_quote($filename); $input_bogons++; delete $inode_to_file_name{$candidate}->{$filename};