|
Lines 27-32
use C4::Koha qw(
Link Here
|
| 27 |
getitemtypeimagelocation |
27 |
getitemtypeimagelocation |
| 28 |
GetNormalizedISBN |
28 |
GetNormalizedISBN |
| 29 |
GetNormalizedUPC |
29 |
GetNormalizedUPC |
|
|
30 |
GetNormalizedOCLCNumber |
| 30 |
); |
31 |
); |
| 31 |
use C4::Circulation qw( CanBookBeRenewed GetRenewCount GetIssuingCharges ); |
32 |
use C4::Circulation qw( CanBookBeRenewed GetRenewCount GetIssuingCharges ); |
| 32 |
use C4::External::BakerTaylor qw( image_url link_url ); |
33 |
use C4::External::BakerTaylor qw( image_url link_url ); |
|
Lines 296-304
if ( $pending_checkouts->count ) { # Useless test
Link Here
|
| 296 |
|
297 |
|
| 297 |
my $isbn = GetNormalizedISBN($issue->{'isbn'}); |
298 |
my $isbn = GetNormalizedISBN($issue->{'isbn'}); |
| 298 |
$issue->{normalized_isbn} = $isbn; |
299 |
$issue->{normalized_isbn} = $isbn; |
| 299 |
my $marcrecord = $biblio_object->metadata->record({ embed_items => 1, opac => 1, patron => $patron,}); |
|
|
| 300 |
$issue->{normalized_upc} = GetNormalizedUPC( $marcrecord, C4::Context->preference('marcflavour') ); |
| 301 |
|
300 |
|
|
|
301 |
if ( C4::Context->preference('BakerTaylorEnabled') |
| 302 |
|| C4::Context->preference('SyndeticsEnabled') |
| 303 |
|| C4::Context->preference('SyndeticsCoverImages') ) |
| 304 |
{ |
| 305 |
my $marcrecord = $biblio_object->metadata->record( { embed_items => 1, opac => 1, patron => $patron, } ); |
| 306 |
$issue->{normalized_upc} = GetNormalizedUPC( $marcrecord, C4::Context->preference('marcflavour') ); |
| 307 |
$issue->{normalized_oclc} = GetNormalizedOCLCNumber( $marcrecord, C4::Context->preference('marcflavour') ); |
| 308 |
} |
| 302 |
# My Summary HTML |
309 |
# My Summary HTML |
| 303 |
if (my $my_summary_html = C4::Context->preference('OPACMySummaryHTML')){ |
310 |
if (my $my_summary_html = C4::Context->preference('OPACMySummaryHTML')){ |
| 304 |
$issue->{author} ? $my_summary_html =~ s/{AUTHOR}/$issue->{author}/g : $my_summary_html =~ s/{AUTHOR}//g; |
311 |
$issue->{author} ? $my_summary_html =~ s/{AUTHOR}/$issue->{author}/g : $my_summary_html =~ s/{AUTHOR}//g; |
| 305 |
- |
|
|