@@ -, +, @@ --- C4/Search.pm | 8 +++++--- 1 files changed, 5 insertions(+), 3 deletions(-) --- a/C4/Search.pm +++ a/C4/Search.pm @@ -1698,9 +1698,11 @@ sub searchResults { # loop through all of the records we've retrieved for ( my $i = $offset ; $i <= $times - 1 ; $i++ ) { - my $marcrecord = eval { MARC::File::USMARC::decode( $marcresults->[$i] ) }; - warn "ERROR DECODING RECORD - $@: " . $marcresults->[$i] if $@; - next if $@; + my $marcrecord = eval { MARC::File::USMARC::decode( $marcresults->[$i] ); }; + if ( $@ ) { + warn "ERROR DECODING RECORD - $@: " . $marcresults->[$i]; + next; + } my $fw = $scan ? undef --