From f3dd19f2f7892940582dde1a443d6a7574f3dbc7 Mon Sep 17 00:00:00 2001 From: Owen Leonard Date: Mon, 10 May 2010 15:24:47 -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. Signed-off-by: Galen Charlton --- opac/opac-export.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/opac/opac-export.pl b/opac/opac-export.pl index 0e2d94f915..4c53aff006 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); -- 2.39.5