The whole point of test mode, NOT actually committing actions.

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

diff --git a/Open-ILS/src/support-scripts/edi_pusher.pl b/Open-ILS/src/support-scripts/edi_pusher.pl
index a5eff79..b18852b 100755 (executable)
--- a/Open-ILS/src/support-scripts/edi_pusher.pl
+++ b/Open-ILS/src/support-scripts/edi_pusher.pl
@@ -159,6 +159,7 @@ foreach my $def (@$defs) {
         my $logstr2 = sprintf "event %s, PO %s, template_output %s", $_->{id}, $message->purchase_order, $event->template_output->id;
         if ($opts->{test}) {
             print "Test mode, skipping translation/send\n";
+            next;
         }
 
         printf "\nNow calling attempt_translation for $logstr2\n\n";