View | Details | Raw Unified | Return to bug 12243
Collapse All | Expand All

(-)a/C4/Koha.pm (-2 / +1 lines)
Lines 1595-1601 sub NormalizeISBN { Link Here
1595
1595
1596
    my $isbn = Business::ISBN->new($string);
1596
    my $isbn = Business::ISBN->new($string);
1597
1597
1598
    if ( $isbn && $isbn->error != Business::ISBN::BAD_ISBN ) {
1598
    if ( $isbn && $isbn->is_valid() ) {
1599
1599
1600
        if ( $format eq 'ISBN-10' ) {
1600
        if ( $format eq 'ISBN-10' ) {
1601
            $isbn = $isbn->as_isbn10();
1601
            $isbn = $isbn->as_isbn10();
1602
- 

Return to bug 12243