From 27c789347f9a2c2d78a271ac88898dfa9a4203ec Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 21 Aug 2020 14:00:51 +0200 Subject: [PATCH] Bug 26270: Fix ThingISBN after a change in behaviour This is just a guess! One of our tests is failing since today and we don't modify anything in this area. My guess is that the service is now returning the normalized version of the ISBN Signed-off-by: Martin Renvoize --- C4/XISBN.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/C4/XISBN.pm b/C4/XISBN.pm index c28cc340b6..de9dc100fe 100644 --- a/C4/XISBN.pm +++ b/C4/XISBN.pm @@ -106,6 +106,8 @@ sub get_xisbns { next if $unique_xisbns->{ $response_data->{content} }; $unique_xisbns->{ $response_data->{content} }++; my $xbiblio= _get_biblio_from_xisbn($response_data->{content}); + next unless $xbiblio; + next if $xbiblio->{normalized_isbn} && $xbiblio->{normalized_isbn} eq $isbn; push @xisbns, $xbiblio if $xbiblio && $xbiblio->{biblionumber} ne $biblionumber; } if ( wantarray ) { -- 2.20.1