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 |
- |
|
|