[open-ils-commits] r17673 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq (atz)

[svn at svn.open-ils.org]

Author: atz
Date: 2010-09-15 01:24:52 -0400 (Wed, 15 Sep 2010)
New Revision: 17673

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq/PurchaseOrderEDIRequired.pm
Log:
Allow state='retry'

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq/PurchaseOrderEDIRequired.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq/PurchaseOrderEDIRequired.pm	2010-09-15 05:24:50 UTC (rev 17672)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq/PurchaseOrderEDIRequired.pm	2010-09-15 05:24:52 UTC (rev 17673)
@@ -16,8 +16,10 @@
             new_editor->retrieve_acq_provider($po->provider);
 
     return 1 if 
-        $po->state eq 'on-order' and 
-        $provider->edi_default   and 
+        ($po->state eq 'on-order' or
+         $po->state eq 'retry'      ) and 
+        $provider                     and 
+        $provider->edi_default        and 
         $U->is_true($provider->active);
 
     return 0;