Lines 1241-1246
sub GetNormalizedISBN {
Link Here
|
1241 |
my ($isbn,$record,$marcflavour) = @_; |
1241 |
my ($isbn,$record,$marcflavour) = @_; |
1242 |
my @fields; |
1242 |
my @fields; |
1243 |
if ($isbn) { |
1243 |
if ($isbn) { |
|
|
1244 |
# Koha attempts to store multiple ISBNs in biblioitems.isbn, separated by " | " |
1245 |
# anything after " | " should be removed, along with the delimiter |
1246 |
$isbn =~ s/(.*)( \| )(.*)/$1/; |
1244 |
return _isbn_cleanup($isbn); |
1247 |
return _isbn_cleanup($isbn); |
1245 |
} |
1248 |
} |
1246 |
return undef unless $record; |
1249 |
return undef unless $record; |
1247 |
- |
|
|