This should fix the issue on other pages.
Test plan:
Try to download and export the basket (intranet+opac sides).
Re-tested for errors in comment #5, they do not longer appear.
Signed-off-by: Marc Veron <veron@veron.ch>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
foreach my $biblio (@bibs) {
my $record = GetMarcBiblio($biblio, 1);
foreach my $biblio (@bibs) {
my $record = GetMarcBiblio($biblio, 1);
if ($format eq 'iso2709') {
$output .= $record->as_usmarc();
if ($format eq 'iso2709') {
$output .= $record->as_usmarc();
$template2->param( biblionumber => $biblionumber );
my $dat = GetBiblioData($biblionumber);
$template2->param( biblionumber => $biblionumber );
my $dat = GetBiblioData($biblionumber);
my $record = GetMarcBiblio($biblionumber, 1);
my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
my $record = GetMarcBiblio($biblionumber, 1);
my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
$template->param( biblionumber => $biblionumber );
my $dat = &GetBiblioData($biblionumber);
$template->param( biblionumber => $biblionumber );
my $dat = &GetBiblioData($biblionumber);
my $record = &GetMarcBiblio($biblionumber);
next unless $record;
my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
my $record = &GetMarcBiblio($biblionumber);
next unless $record;
my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
$template2->param( biblionumber => $biblionumber );
my $dat = GetBiblioData($biblionumber);
$template2->param( biblionumber => $biblionumber );
my $dat = GetBiblioData($biblionumber);
my $record = GetMarcBiblio($biblionumber, 1);
my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
my $record = GetMarcBiblio($biblionumber, 1);
my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );