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

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

Return to bug 41147