From 646fec65caa2f04b807dd78719520bbd13b30951 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Fri, 16 Aug 2019 06:03:55 +0000 Subject: [PATCH] Bug 23324: (QA follow-up) Typo and remove unneeded use statement Two typos in POD typo for routine name. Remove "use Business::ISBN" from Normalize.pm. Signed-off-by: Marcel de Rooy Signed-off-by: Martin Renvoize (cherry picked from commit b48e2d5e7a41511dccadb01808e1ece259c5f0b9) Signed-off-by: Fridolin Somers (cherry picked from commit c8d170a6883c5b72de270ad556abd78080d3cf16) Signed-off-by: Lucas Gass --- C4/Koha.pm | 4 ++-- Koha/Util/Normalize.pm | 1 - 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/C4/Koha.pm b/C4/Koha.pm index 2493467fff..9894a060cf 100644 --- a/C4/Koha.pm +++ b/C4/Koha.pm @@ -823,9 +823,9 @@ sub _isbn_cleanup { ) if $isbn; } -=head2 NormalizedISBN +=head2 NormalizeISBN - my $isbns = NormalizedISBN({ + my $isbns = NormalizeISBN({ isbn => $isbn, strip_hyphens => [0,1], format => ['ISBN-10', 'ISBN-13'] diff --git a/Koha/Util/Normalize.pm b/Koha/Util/Normalize.pm index 7fe4179506..af913b9743 100644 --- a/Koha/Util/Normalize.pm +++ b/Koha/Util/Normalize.pm @@ -18,7 +18,6 @@ package Koha::Util::Normalize; # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. use Modern::Perl; -use Business::ISBN; use parent qw( Exporter ); -- 2.39.5