Bug 9144 - bulkmarcimport.pl - Problem identifying errors
Replace \r with \n for newline in output for bulkmarcimport.pl Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com> Signed-off-by: Paul Poulain <paul.poulain@biblibre.com> Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
This commit is contained in:
parent
4a0b597e3d
commit
33e95ea3b9
|
|
@ -187,7 +187,7 @@ RECORD: while ( ) {
|
|||
last unless ( $record );
|
||||
$i++;
|
||||
print ".";
|
||||
print "\r$i" unless $i % 100;
|
||||
print "\n$i" unless $i % 100;
|
||||
|
||||
# transcode the record to UTF8 if needed & applicable.
|
||||
if ($record->encoding() eq 'MARC-8' and not $skip_marc8_conversion) {
|
||||
|
|
|
|||
Loading…
Reference in New Issue