Lines 659-664
sub is_serial {
Link Here
|
659 |
return 0; |
659 |
return 0; |
660 |
} |
660 |
} |
661 |
|
661 |
|
|
|
662 |
=head3 custom_cover_image_url |
663 |
|
664 |
my $image_url = $biblio->custom_cover_image_url |
665 |
|
666 |
Return the specific url of the cover image for this bibliographic record. |
667 |
It is built regaring the value of the system preference CustomCoverImagesURL |
668 |
|
669 |
=cut |
670 |
|
671 |
sub custom_cover_image_url { |
672 |
my ( $self ) = @_; |
673 |
my $url = C4::Context->preference('CustomCoverImagesURL'); |
674 |
if ( $url =~ m|%isbn%| ) { |
675 |
my $isbn = $self->biblioitem->isbn; |
676 |
$url =~ s|%isbn%|$isbn|g; |
677 |
} |
678 |
if ( $url =~ m|%issn%| ) { |
679 |
my $issn = $self->biblioitem->issn; |
680 |
$url =~ s|%issn%|$issn|g; |
681 |
} |
682 |
return $url; |
683 |
} |
684 |
|
662 |
=head3 type |
685 |
=head3 type |
663 |
|
686 |
|
664 |
=cut |
687 |
=cut |
665 |
- |
|
|