View | Details | Raw Unified | Return to bug 41147
Collapse All | Expand All

(-)a/misc/migration_tools/bulkmarcimport.pl (-3 / +3 lines)
Lines 332-338 $schema->txn_begin; Link Here
332
RECORD: while () {
332
RECORD: while () {
333
333
334
    my $record;
334
    my $record;
335
    $record_number++;
335
    $record_number++
336
        ;    # We increment here, if a record is skipped because we can't load form the batch or can't be converted
337
             # it still counts against the limit if a number to process is passed
336
338
337
    # get record
339
    # get record
338
    eval { $record = $batch->next() };
340
    eval { $record = $batch->next() };
Lines 348-354 RECORD: while () { Link Here
348
        next;
350
        next;
349
    }
351
    }
350
    if ($record) {
352
    if ($record) {
351
        $record_number++;
352
353
353
        if ($skip_bad_records) {
354
        if ($skip_bad_records) {
354
            my $xml = $record->as_xml_record();
355
            my $xml = $record->as_xml_record();
355
- 

Return to bug 41147