From 5e90fc421d75c64bcb8b3d5ae54e6bda1718d33b Mon Sep 17 00:00:00 2001 From: Arthur Suzuki Date: Wed, 19 Feb 2025 15:57:53 +0100 Subject: [PATCH] Bug 20551: (QA follow-up) don't read record content if there is an error during decoding Signed-off-by: Andrew Fuerste Henry --- Koha/Exporter/Record.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/Koha/Exporter/Record.pm b/Koha/Exporter/Record.pm index 080ded8fd7..0b3f002ecc 100644 --- a/Koha/Exporter/Record.pm +++ b/Koha/Exporter/Record.pm @@ -260,9 +260,7 @@ sub export { my $errorcount_on_decode = eval { scalar( MARC::File::USMARC->decode( $record->as_usmarc )->warnings() ) }; if ( $errorcount_on_decode || $@ ) { - my ( $id_tag, $id_subfield ) = GetMarcFromKohaField( 'biblio.biblionumber', '' ); - my $record_id = $record->subfield( $id_tag, $id_subfield ); - my $msg = "$record_type $record_id could not be USMARC decoded/encoded. " . ( $@ // '' ); + my $msg = "$record_type could not be USMARC decoded/encoded. " . ( $@ // '' ); chomp $msg; Koha::Logger->get->warn($msg); return 0; -- 2.39.5