|
Lines 1426-1434
sub GetCOinSBiblio {
Link Here
|
| 1426 |
$isbn = $record->subfield( '773', 'z' ) || ''; |
1426 |
$isbn = $record->subfield( '773', 'z' ) || ''; |
| 1427 |
$issn = $record->subfield( '773', 'x' ) || ''; |
1427 |
$issn = $record->subfield( '773', 'x' ) || ''; |
| 1428 |
if ($mtx eq 'journal') { |
1428 |
if ($mtx eq 'journal') { |
| 1429 |
$title .= "&rft.title=" . (($record->subfield( '773', 't' ) || $record->subfield( '773', 'a'))); |
1429 |
$title .= "&rft.title=" . ( $record->subfield( '773', 't' ) || $record->subfield( '773', 'a') || q{} ); |
| 1430 |
} else { |
1430 |
} else { |
| 1431 |
$title .= "&rft.btitle=" . (($record->subfield( '773', 't' ) || $record->subfield( '773', 'a')) || ''); |
1431 |
$title .= "&rft.btitle=" . ( $record->subfield( '773', 't' ) || $record->subfield( '773', 'a') || q{} ); |
| 1432 |
} |
1432 |
} |
| 1433 |
foreach my $rel ($record->subfield( '773', 'g' )) { |
1433 |
foreach my $rel ($record->subfield( '773', 'g' )) { |
| 1434 |
if ($pages) { |
1434 |
if ($pages) { |
| 1435 |
- |
|
|