From 23341d90a3f4242465be4ae7f3b479bf62fcc5f3 Mon Sep 17 00:00:00 2001 From: Jared CAMINS-ESAKOV Date: Mon, 12 Apr 2010 13:03:28 -0400 Subject: [PATCH 3/3] Recognize journal/book articles for COinS Content-Type: text/plain; charset="utf-8" C4::Biblio::GetCOinSBiblio now identifies articles from journals as being from journals and articles from books as being from books. --- C4/Biblio.pm | 8 ++++---- 1 files changed, 4 insertions(+), 4 deletions(-) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index 572a758..9d1f83c 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -1256,11 +1256,11 @@ sub GetCOinSBiblio { $pubyear = substr $record->field('008')->data(), 7, 4; $isbn = $record->subfield( '773', 'z' ) || ''; $issn = $record->subfield( '773', 'x' ) || ''; -# if ($mtx eq 'journal') { + if ($mtx eq 'journal') { $title .= "&rft.title=" . (($record->subfield( '773', 't' ) || $record->subfield( '773', 'a'))); -# } else { -# $title .= "&rft.btitle=" . (($record->subfield( '773', 't' ) || $record->subfield( '773', 'a')) || ''); -# } + } else { + $title .= "&rft.btitle=" . (($record->subfield( '773', 't' ) || $record->subfield( '773', 'a')) || ''); + } foreach my $rel ($record->subfield( '773', 'g' )) { if ($pages) { $pages .= ', '; -- 1.7.0.4