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

[svn at svn.open-ils.org]

Author: atz
Date: 2010-06-11 13:10:33 -0400 (Fri, 11 Jun 2010)
New Revision: 16682

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq/PurchaseOrderEDIRequired.pm
Log:
Bugfix fatal error: $self->editor is not defined

Logger wasn't being used either.

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-06-11 17:10:32 UTC (rev 16681)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Validator/Acq/PurchaseOrderEDIRequired.pm	2010-06-11 17:10:33 UTC (rev 16682)
@@ -1,22 +1,23 @@
 package OpenILS::Application::Trigger::Validator::Acq::PurchaseOrderEDIRequired;
 use strict; use warnings;
-use OpenSRF::Utils::Logger qw/:logger/;
+# use OpenSRF::Utils::Logger qw/:logger/;
+use OpenILS::Utils::CStoreEditor qw/ new_editor /;
 use OpenILS::Application::AppUtils;
 my $U = 'OpenILS::Application::AppUtils';
 
 sub handler {
     my $self = shift;
-    my $env = shift;
-    my $po = $env->{target};
+    my $env  = shift;
+    my $po   = $env->{target};
 
     my $provider = 
         ref($po->provider) ? 
             $po->provider : 
-            $self->editor->retrieve_acq_provider($po->provider);
+            new_editor->retrieve_acq_provider($po->provider);
 
     return 1 if 
         $po->state eq 'on-order' and 
-        $provider->edi_default and 
+        $provider->edi_default   and 
         $U->is_true($provider->active);
 
     return 0;