|
Lines 50-56
elsif ($format=~ /mods/) {
Link Here
|
| 50 |
$marc = marc2modsxml($marc); |
50 |
$marc = marc2modsxml($marc); |
| 51 |
} |
51 |
} |
| 52 |
elsif ($format =~ /ris/) { |
52 |
elsif ($format =~ /ris/) { |
| 53 |
$marc = marc2ris(MARC::Record->new_from_usmarc($marc)); |
53 |
$marc = marc2ris($marc); |
| 54 |
} |
54 |
} |
| 55 |
elsif ($format =~ /bibtex/) { |
55 |
elsif ($format =~ /bibtex/) { |
| 56 |
$marc = marc2bibtex(C4::Biblio::GetMarcBiblio($biblionumber),$biblionumber); |
56 |
$marc = marc2bibtex(C4::Biblio::GetMarcBiblio($biblionumber),$biblionumber); |
| 57 |
- |
|
|