- my $dat = GetBiblioData($biblionumber);
- next unless $dat;
- my $record = GetMarcBiblio({
- biblionumber => $biblionumber,
- embed_items => 1 });
- my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
+ my $biblio = Koha::Biblios->find( $biblionumber ) or next;
+ my $dat = $biblio->unblessed;
+ my $record = $biblio->metadata->record({ embed_items => 1 });
+ my $marcauthorsarray = $biblio->get_marc_contributors;