From a7a3cc95b954e85a2dac06fc2c28443f8dae397b Mon Sep 17 00:00:00 2001 From: Lebbeous Fogle-Weekley Date: Thu, 16 Aug 2012 15:38:59 -0400 Subject: [PATCH] Fix thinkos in EDI Invoicing The lesson of the day is, test the code you actually commit, not just the bits and pieces. Thanks to Bill Erickson on this. Signed-off-by: Lebbeous Fogle-Weekley --- Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm index 277f76e7d1..6e9ce69d0d 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm @@ -486,7 +486,7 @@ sub process_jedi { new OpenILS::Utils::LooseEDI::Message($part->{$key}); push @messages, $invoice_message if $class->create_acq_invoice_from_edi( - $e, $invoice_message, $remote->provider + $e, $invoice_message, $remote->provider, $message ); next; } @@ -661,7 +661,7 @@ sub create_acq_invoice_from_edi { $logger->error( $log_prefix . "no invoice ID # in INVOIC message; " . shift ); - } + }; return 0 unless $eg_inv->inv_ident; my @eg_inv_entries; -- 2.11.0