Bug 12478: paging is fixed now too

[srvgit] / opac / opac-export.pl

diff --git a/opac/opac-export.pl b/opac/opac-export.pl
index bf040db..c4ab83a 100755 (executable)
--- a/opac/opac-export.pl
+++ b/opac/opac-export.pl
@@ -60,8 +60,8 @@ elsif ($format =~ /bibtex/) {
     $marc = marc2bibtex(C4::Biblio::GetMarcBiblio($biblionumber),$biblionumber);
     $format = 'bibtex';
 }
-elsif ($format =~ /dc/) {
-    ($error,$marc) = marc2dcxml($marc,1);
+elsif ($format =~ /dc$/) {
+    $marc = marc2dcxml(undef, undef, $biblionumber, $format);
     $format = "dublin-core.xml";
 }
 elsif ($format =~ /marc8/) {