From: Thomas Berezansky <tsbere@mvlc.org>
Date: Mon, 28 Mar 2016 15:03:59 +0000 (-0400)
Subject: LP1559281: Allow Baker and Taylor ISBNs
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=refs%2Fheads%2Fuser%2Ftsbere%2Flp1559281_bt_isbns_cc;p=working%2FEvergreen.git

LP1559281: Allow Baker and Taylor ISBNs

For Content Cafe, 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 <tsbere@mvlc.org>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent/ContentCafe.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent/ContentCafe.pm
index 4dd5b0c6fd..36f63aa0eb 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent/ContentCafe.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent/ContentCafe.pm
@@ -9,6 +9,9 @@ use XML::LibXML;
 use MIME::Base64;
 use DateTime;
 
+# Hack country_data to allow B&T fake ISBNs
+$Business::ISBN::country_data{631} = ['B&T' => ['0000000' => '9999999']];
+
 my $AC = 'OpenILS::WWW::AddedContent';
 
 my $post_url = 'http://contentcafe2.btol.com/ContentCafe/ContentCafe.asmx/XmlPost';