From d0c1615e6f8c46f877b73330d0be2b8ecdc5d18e Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 29 Jul 2022 18:28:03 +0200 Subject: [PATCH] Bug 29897: Remove 'linkage' leftover --- Koha/Authority.pm | 3 +-- t/db_dependent/Koha/Authorities.t | 2 -- 2 files changed, 1 insertion(+), 4 deletions(-) diff --git a/Koha/Authority.pm b/Koha/Authority.pm index 0a6d30c6166..ff45d20a3dd 100644 --- a/Koha/Authority.pm +++ b/Koha/Authority.pm @@ -136,9 +136,8 @@ sub get_identifiers { for my $field ( $record->field('024') ) { my $sf_2 = $field->subfield('2'); my $sf_a = $field->subfield('a'); - my $sf_6 = $field->subfield('6'); next unless $sf_2 && $sf_a; - push @identifiers, {source => $sf_2, number => $sf_a, linkage => $sf_6}; + push @identifiers, {source => $sf_2, number => $sf_a, }; } return \@identifiers; diff --git a/t/db_dependent/Koha/Authorities.t b/t/db_dependent/Koha/Authorities.t index a9c507df837..5dbfaaa4973 100755 --- a/t/db_dependent/Koha/Authorities.t +++ b/t/db_dependent/Koha/Authorities.t @@ -276,12 +276,10 @@ subtest 'get_identifiers' => sub { { source => 'orcid', number => '0000-0002-1234-5678', - linkage => 'https://orcid.org/0000-0002-1234-5678' }, { source => 'scopus', number => '01234567890', - linkage => 'https://www.scopus.com/authid/detail.uri?authorId=01234567890' } ] ); -- 2.25.1