From: Lebbeous Fogle-Weekley <lebbeous@esilibrary.com>
Date: Thu, 16 Aug 2012 19:38:59 +0000 (-0400)
Subject: Fix thinkos in EDI Invoicing
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=9b2262b277ff5ebb93093bf38a786424f5f19128;p=contrib%2FConifer.git

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 <lebbeous@esilibrary.com>
Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

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;