From 020c3c444d3e5c3d1eb6ee071ebfa27b01b7f983 Mon Sep 17 00:00:00 2001 From: Julian Maurice Date: Fri, 8 Dec 2017 15:31:49 +0100 Subject: [PATCH] Bug 17182: (QA follow-up) Fix call to GetMarcBiblio Signed-off-by: Julian Maurice Signed-off-by: Jonathan Druart --- acqui/neworderbiblio.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/acqui/neworderbiblio.pl b/acqui/neworderbiblio.pl index beaa4da217..a2a3c7a94b 100755 --- a/acqui/neworderbiblio.pl +++ b/acqui/neworderbiblio.pl @@ -127,7 +127,7 @@ my @results; foreach my $result ( @{$marcresults} ) { my $marcrecord = C4::Search::new_record_from_zebra( 'biblioserver', $result ); my $biblio = TransformMarcToKoha( $marcrecord, '' ); - $biblio->{subtitles} = GetRecordValue( 'subtitle', GetMarcBiblio( $biblio->{biblionumber} ), GetFrameworkCode( $biblio->{biblionumber} ) ); + $biblio->{subtitles} = GetRecordValue( 'subtitle', GetMarcBiblio({ biblionumber => $biblio->{biblionumber} }), GetFrameworkCode( $biblio->{biblionumber} ) ); $biblio->{booksellerid} = $booksellerid; push @results, $biblio; -- 2.39.5