From: atz <atz@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 18 Jun 2010 15:56:56 +0000 (+0000)
Subject: Log message to both STDERR and log.
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=c98a73b88ed0cbbbfa1f445a3ffb6a90dd3a6c0d;p=evergreen%2Fbjwebb.git

Log message to both STDERR and log.

git-svn-id: svn://svn.open-ils.org/ILS/trunk@16758 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 f6065afff..eb7f29f6a 100755
--- a/Open-ILS/src/support-scripts/edi_pusher.pl
+++ b/Open-ILS/src/support-scripts/edi_pusher.pl
@@ -88,14 +88,16 @@ foreach my $def (@$defs) {
     $query->{limit} = $remaining if $remaining > 0;
 
     if ($opts->{verbose}) {
+        # $subq->{'select'}->{'acqedim'} = ['id', 'purchase_order', 'message_type', 'status'];
         my $excluded = $e->json_query($subq);
-        print "Excluded: ", scalar(@$excluded), " purchase order(s): ", join("\n", map {Dumper $_} @$excluded), "\n";
+        print "Excluded: ", scalar(@$excluded), " purchase order(s):\n", Dumper(\@$excluded), "\n";
     }
 
     my $events = $e->json_query($query);
 
     if(!$events) {
-        $logger->error("error querying JEDI events for event definition $def->id");
+        print STDERR   "error querying JEDI events for event definition ", $def->id, "\n";
+        $logger->error("error querying JEDI events for event definition ". $def->id);
         next;
     }