@@ -, +, @@ Koha::Biblio->get_marc_notes --- Koha/Biblio.pm | 4 ++-- basket/basket.pl | 2 +- catalogue/detail.pl | 2 +- opac/opac-basket.pl | 2 +- opac/opac-detail.pl | 2 +- t/db_dependent/Koha/Biblio.t | 6 ++++-- 6 files changed, 10 insertions(+), 8 deletions(-) --- a/Koha/Biblio.pm +++ a/Koha/Biblio.pm @@ -912,7 +912,7 @@ sub cover_images { =head3 get_marc_notes - $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour }); + $marcnotesarray = $biblio->get_marc_notes({ opac => 1 }); Get all notes from the MARC record and returns them in an array. The notes are stored in different fields depending on MARC flavour. @@ -923,7 +923,7 @@ MARC21 5XX $u subfields receive special attention as they are URIs. sub get_marc_notes { my ( $self, $params ) = @_; - my $marcflavour = $params->{marcflavour}; + my $marcflavour = C4::Context->preference('marcflavour'); my $opac = $params->{opac}; my $scope = $marcflavour eq "UNIMARC"? '3..': '5..'; --- a/basket/basket.pl +++ a/basket/basket.pl @@ -68,7 +68,7 @@ foreach my $biblionumber ( @bibs ) { my $biblio = Koha::Biblios->find( $biblionumber ) or next; my $dat = $biblio->unblessed; my $record = &GetMarcBiblio({ biblionumber => $biblionumber }); - my $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour }); + my $marcnotesarray = $biblio->get_marc_notes; my $marcauthorsarray = $biblio->get_marc_authors; my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour ); my $marcseriesarray = GetMarcSeries ($record,$marcflavour); --- a/catalogue/detail.pl +++ a/catalogue/detail.pl @@ -145,7 +145,7 @@ $template->param( normalized_isbn => $isbn, ); -my $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour }); +my $marcnotesarray = $biblio->get_marc_notes; my $itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search->unblessed } }; --- a/opac/opac-basket.pl +++ a/opac/opac-basket.pl @@ -90,7 +90,7 @@ foreach my $biblionumber ( @bibs ) { }); $record_processor->process($record); next unless $record; - my $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour, opac => 1 }); + my $marcnotesarray = $biblio->get_marc_notes({ opac => 1 }); my $marcauthorsarray = $biblio->get_marc_authors; my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour ); my $marcseriesarray = GetMarcSeries ($record,$marcflavour); --- a/opac/opac-detail.pl +++ a/opac/opac-detail.pl @@ -782,7 +782,7 @@ if (scalar(@itemloop) == 0 || scalar(@otheritemloop) == 0) { } } -my $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour, opac => 1 }); +my $marcnotesarray = $biblio->get_marc_notes({ opac => 1 }); if( C4::Context->preference('ArticleRequests') ) { my $patron = $borrowernumber ? Koha::Patrons->find($borrowernumber) : undef; --- a/t/db_dependent/Koha/Biblio.t +++ a/t/db_dependent/Koha/Biblio.t @@ -702,7 +702,7 @@ subtest 'get_marc_notes() MARC21 tests' => sub { C4::Biblio::ModBiblio( $record, $biblio->biblionumber ); $biblio = Koha::Biblios->find( $biblio->biblionumber); - my $notes = $biblio->get_marc_notes({ marcflavour => 'MARC21' }); + my $notes = $biblio->get_marc_notes; is( $notes->[0]->{marcnote}, 'Note1', 'First note' ); is( $notes->[1]->{marcnote}, 'Note2', 'Second note' ); is( $notes->[2]->{marcnote}, 'http://someserver.com', 'URL separated' ); @@ -710,7 +710,7 @@ subtest 'get_marc_notes() MARC21 tests' => sub { is( $notes->[4]->{marcnote}, 'Note5', 'Fifth note' ); is( $notes->[5]->{marcnote}, 'Description should show', 'Authorised value is correctly parsed to show description rather than code' ); is( @$notes, 6, 'No more notes' ); - $notes = $biblio->get_marc_notes({ marcflavour => 'MARC21', opac => 1 }); + $notes = $biblio->get_marc_notes({ opac => 1 }); is( $notes->[0]->{marcnote}, 'Note1', 'First note' ); is( $notes->[1]->{marcnote}, 'Note2', 'Second note' ); is( $notes->[2]->{marcnote}, 'http://someserver.com', 'URL separated' ); @@ -732,6 +732,7 @@ subtest 'get_marc_notes() UNIMARC tests' => sub { $schema->storage->txn_begin; t::lib::Mocks::mock_preference( 'NotesToHide', '310' ); + t::lib::Mocks::mock_preference( 'marcflavour', 'UNIMARC' ); my $biblio = $builder->build_sample_biblio; my $record = $biblio->metadata->record; @@ -747,6 +748,7 @@ subtest 'get_marc_notes() UNIMARC tests' => sub { is( $notes->[1]->{marcnote}, 'Note2', 'Second note' ); is( @$notes, 2, 'No more notes' ); + t::lib::Mocks::mock_preference( 'marcflavour', 'MARC21' ); $schema->storage->txn_rollback; }; --