From f8a6dea936d6141961c55528a5d3c68eb5b86b1d Mon Sep 17 00:00:00 2001 From: Thomas Berezansky Date: Mon, 21 Mar 2016 12:07:14 -0400 Subject: [PATCH] LP1559281: Allow Baker and Taylor ISBNs Jam a B&T entry into the hash so that Business::ISBN doesn't register them as invalid prefix ISBNs. Signed-off-by: Thomas Berezansky --- Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent.pm index 254d790cf6..713e96700e 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent.pm @@ -23,6 +23,9 @@ use MIME::Base64; use Business::ISBN; use Business::ISSN; +# Hack country_data to allow B&T fake ISBNs +$Business::ISBN::country_data{631} = ['B&T' => ['0000000' => '9999999']]; + my $AC = __PACKAGE__; -- 2.11.0