From 72ad7247d16517ca754358caf41b92663a68ba3f Mon Sep 17 00:00:00 2001 From: Owen Leonard Date: Mon, 10 May 2010 15:22:42 -0400 Subject: [PATCH] Fix for Bug 4400, BIBTEX export from OPAC results in empty file opac-export.pl tries to get two variables from marc2bibtex(), but it only returns one. --- opac/opac-export.pl | 3 +-- 1 files changed, 1 insertions(+), 2 deletions(-) diff --git a/opac/opac-export.pl b/opac/opac-export.pl index 0e2d94f..4c53aff 100755 --- a/opac/opac-export.pl +++ b/opac/opac-export.pl @@ -39,8 +39,7 @@ if ($op eq "export") { $marc = marc2ris(MARC::Record->new_from_usmarc($marc)); } elsif ($format =~ /bibtex/) { - my $error; - ($error,$marc) = marc2bibtex(C4::Biblio::GetMarcBiblio($biblionumber),$biblionumber); + $marc = marc2bibtex(C4::Biblio::GetMarcBiblio($biblionumber),$biblionumber); }elsif ($format =~ /dc/) { my $error; ($error,$marc) = marc2dcxml($marc,1); -- 1.7.0.4