|
Lines 959-965
sub custom_cover_image_url {
Link Here
|
| 959 |
$url =~ s|{isbn}|$isbn|g; |
959 |
$url =~ s|{isbn}|$isbn|g; |
| 960 |
} |
960 |
} |
| 961 |
if ( $url =~ m|{normalized_isbn}| ) { |
961 |
if ( $url =~ m|{normalized_isbn}| ) { |
| 962 |
my $normalized_isbn = C4::Koha::GetNormalizedISBN($self->biblioitem->isbn); |
962 |
my $normalized_isbn = $self->normalized_isbn; |
| 963 |
return unless $normalized_isbn; |
963 |
return unless $normalized_isbn; |
| 964 |
$url =~ s|{normalized_isbn}|$normalized_isbn|g; |
964 |
$url =~ s|{normalized_isbn}|$normalized_isbn|g; |
| 965 |
} |
965 |
} |
|
Lines 1229-1234
sub get_marc_authors {
Link Here
|
| 1229 |
return [@first_authors, @other_authors]; |
1229 |
return [@first_authors, @other_authors]; |
| 1230 |
} |
1230 |
} |
| 1231 |
|
1231 |
|
|
|
1232 |
=head3 normalized_isbn |
| 1233 |
|
| 1234 |
my $normalized_isbn = $biblio->normalized_isbn |
| 1235 |
|
| 1236 |
Normalizes and returns the first valid ISBN found in the record. |
| 1237 |
ISBN13 are converted into ISBN10. This is required to get some book cover images. |
| 1238 |
|
| 1239 |
=cut |
| 1240 |
|
| 1241 |
sub normalized_isbn { |
| 1242 |
my ( $self) = @_; |
| 1243 |
return C4::Koha::GetNormalizedISBN($self->biblioitem->isbn); |
| 1244 |
} |
| 1232 |
|
1245 |
|
| 1233 |
=head3 to_api |
1246 |
=head3 to_api |
| 1234 |
|
1247 |
|
| 1235 |
- |
|
|