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