MT2116 : Addons to the CSV Export

[koha.git] / opac / opac-downloadcart.pl

diff --git a/opac/opac-downloadcart.pl b/opac/opac-downloadcart.pl
index fe80f30..241f879 100755 (executable)
--- a/opac/opac-downloadcart.pl
+++ b/opac/opac-downloadcart.pl
@@ -68,7 +68,7 @@ if ($bib_list && $format) {
            case "ris"     { $output .= marc2ris($record); }
            case "bibtex"  { $output .= marc2bibtex($record, $biblio); }
            # We're in the case of a csv profile (firstpass is used for headers printing) :
-            case /^\d+$/   { $output .= marc2csv($record, $format, $firstpass); }
+            case /^\d+$/   { $output .= marc2csv($biblio, $format, $firstpass); }
        }
         $firstpass = 0;