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

(-)a/misc/migration_tools/bulkmarcimport.pl (-3 / +1 lines)
Lines 526-532 RECORD: foreach my $record (@{$marc_records}) { Link Here
526 
                        next RECORD;
 526 
                        next RECORD;
527 
                    }
 527 
                    }
528 
                    elsif (!$success) {
 528 
                    elsif (!$success) {
529 
                        warn "ERROR: Update biblio $matched_record_id failed for unkown reason";
 529 
                        warn "ERROR: Update biblio $matched_record_id failed for unknown reason";
530 
                        printlog( { id => $matched_record_id, op => "update", status => "ERROR" } ) if ($logfile);
 530 
                        printlog( { id => $matched_record_id, op => "update", status => "ERROR" } ) if ($logfile);
531 
                        next RECORD;
 531 
                        next RECORD;
532 
                    }
 532 
                    }
Lines 713-719 sub GetRecordId { Link Here
713 
            return $marcrecord->subfield($tag, $subfield);
 713 
            return $marcrecord->subfield($tag, $subfield);
714 
        }
 714 
        }
715 
    }
 715 
    }
716 
    return undef;
717 
}
 716 
}
718 
sub build_query {
 717 
sub build_query {
719 
    my ($match, $record) = @_;
 718 
    my ($match, $record) = @_;
720 
-

Return to bug 29440