Lines 651-657
sub marc2bibtex {
Link Here
|
651 |
# Authors |
651 |
# Authors |
652 |
my $marcauthors = GetMarcAuthors($record,C4::Context->preference("marcflavour")); |
652 |
my $marcauthors = GetMarcAuthors($record,C4::Context->preference("marcflavour")); |
653 |
my $author; |
653 |
my $author; |
654 |
for my $authors ( map { map { @$_ } values %$_ } @$marcauthors ) { |
654 |
for my $authors ( map { @$_ } map { $_->{'MARCAUTHOR_SUBFIELDS_LOOP'} } @$marcauthors ) { |
655 |
$author .= " and " if ($author && $$authors{value}); |
655 |
$author .= " and " if ($author && $$authors{value}); |
656 |
$author .= $$authors{value} if ($$authors{value}); |
656 |
$author .= $$authors{value} if ($$authors{value}); |
657 |
} |
657 |
} |
658 |
- |
|
|