From: Robin Sheat <[email protected]>
Signed-off-by: Chris Cormack <[email protected]>
---
C4/Koha.pm | 1 +
1 files changed, 1 insertions(+), 0 deletions(-)
diff --git a/C4/Koha.pm b/C4/Koha.pm
index ab9131a..dc2bcfa 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -1330,6 +1330,7 @@ sub _isbn_cleanup ($) {
my $isbn = Business::ISBN->new( shift );
return undef unless $isbn;
$isbn = $isbn->as_isbn10 if $isbn->type eq 'ISBN13';
+ return undef unless $isbn;
$isbn = $isbn->as_string;
$isbn =~ s/-//g;
return $isbn;
--
1.7.0.4
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-patches
