- elsif ($format eq 'ris' ) {
- $output .= marc2ris($record);
- }
- elsif ($format eq 'bibtex') {
- $output .= marc2bibtex($record, $biblionumber);
+ $output = marc2csv(\@biblios, $format);
+ # Other formats
+ } else {
+ while ( my $content = $contents->next ) {
+ my $biblionumber = $content->biblionumber->biblionumber;
+
+ my $record = GetMarcBiblio($biblionumber, 1);
+ next unless $record;
+
+ if ($format eq 'iso2709') {
+ $output .= $record->as_usmarc();
+ }
+ elsif ($format eq 'ris' ) {
+ $output .= marc2ris($record);
+ }
+ elsif ($format eq 'bibtex') {
+ $output .= marc2bibtex($record, $biblionumber);
+ }
+ elsif ( $format eq 'isbd' ) {
+ $output .= GetISBDView($biblionumber, "opac");
+ $extension = "txt";
+ $type = "text/plain";
+ }