LP#1441770 Liberalized the check for taxes

The amount regex used to check for taxes needed to be liberalized, so
that it could find Ingram's amount sent in EDI messages.  They use an
MOA+120 field, where as we were checking for MOA+124.

Signed-off-by: Liam Whalen <liam.whalen@bc.libraries.coop>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm b/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm
index 3a3ecc6..47ebbc2 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm
@@ -63,7 +63,7 @@ my %edi_charge_fields = (
 # have so far.
 my %edi_tax_fields = (
     type   => qr/^TAX\+7\+([^\+]+)/,
-    amount => qr/^MOA\+124:([^:]+)/
+    amount => qr/^MOA\+12[04]:([^:]+)/
 );
 
 sub new {