[open-ils-commits] r18166 - branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2010-10-05 10:16:35 -0400 (Tue, 05 Oct 2010)
New Revision: 18166

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
Log:
avoid running activated hook when in dry run mode

Modified: branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
===================================================================
--- branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2010-10-05 14:15:40 UTC (rev 18165)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2010-10-05 14:16:35 UTC (rev 18166)
@@ -2238,7 +2238,7 @@
     }
 
     # tell the world we activated a PO
-    $U->create_events_for_hook('acqpo.activated', $po, $po->ordering_agency);
+    $U->create_events_for_hook('acqpo.activated', $po, $po->ordering_agency) unless $dry_run;
 
     return undef;
 }