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

(-)a/C4/Koha.pm (-1 / +3 lines)
Lines 1640-1645 sub GetVariationsOfISBN { Link Here
1640 
    push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-10', strip_hyphens => 1 }) );
 1640 
    push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-10', strip_hyphens => 1 }) );
1641 
    push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-13', strip_hyphens => 1 }) );
 1641 
    push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-13', strip_hyphens => 1 }) );
1642 

          1642
          

        

            

              
              
              1643
              
    # Strip out any "empty" strings from the array

            

            

              1644
              
    @isbns = grep { /\S/ } @isbns;

            

            

              1645
              

            

        

          1643
          
    return wantarray ? @isbns : join( " | ", @isbns );

          1646
          
    return wantarray ? @isbns : join( " | ", @isbns );

        

        

          1644
          
}

          1647
          
}

        

        

          1645
          

          1648
          

        

            

              1646
              
- 

              
              
            






  

  Return to bug 12288