diff options
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/hashl | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -139,7 +139,8 @@ sub db_find_new { my ( $file, $path ) = @_; if ( not any { $_->file_in_db($path) } @ehashl ) { - say "\r\e[2K${file}"; + print STDERR "\r\e[2K"; + say $file; } return; @@ -149,7 +150,8 @@ sub db_find_known { my ( $file, $path ) = @_; if ( any { $_->file_in_db($path) } @ehashl ) { - say "\r\e[2K${file}"; + print STDERR "\r\e[2K"; + say $file; } return; |