avoid running activated hook when in dry run mode

git-svn-id: svn://svn.open-ils.org/ILS/trunk@18165 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
index f6c07ca..e3f8ae3 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
@@ -2238,7 +2238,7 @@ sub activate_purchase_order_impl {
     }
 
     # 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;
 }