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

(-)a/C4/Search.pm (-4 / +5 lines)
Lines 1698-1706 sub searchResults { Link Here
1698
1698
1699
    # loop through all of the records we've retrieved
1699
    # loop through all of the records we've retrieved
1700
    for ( my $i = $offset ; $i <= $times - 1 ; $i++ ) {
1700
    for ( my $i = $offset ; $i <= $times - 1 ; $i++ ) {
1701
        my $marcrecord = eval { MARC::File::USMARC::decode( $marcresults->[$i] ) };
1701
        my $marcrecord = eval { MARC::File::USMARC::decode( $marcresults->[$i] ); };
1702
        warn "ERROR DECODING RECORD - $@: " . $marcresults->[$i] if $@;
1702
        if ( $@ ) {
1703
        next if $@;
1703
            warn "ERROR DECODING RECORD - $@: " . $marcresults->[$i];
1704
            next;
1705
        }
1704
1706
1705
        my $fw = $scan
1707
        my $fw = $scan
1706
             ? undef
1708
             ? undef
1707
- 

Return to bug 10684