From: Jason Stephenson <jstephenson@mvlcstaff.org>
Date: Fri, 1 Apr 2016 14:00:20 +0000 (-0400)
Subject: LP 1768715: Fix bug in pingest.pl after --pipe option was added.
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=d762c9eb243eeb66f827873e602919598a1cf88d;p=contrib%2FConifer.git

LP 1768715: Fix bug in pingest.pl after --pipe option was added.

Apparently, the results of DBI->selectall_arrayref need to be cast to
an array and not just returned as a list.

Signed-off-by: Jason Stephenson <jstephenson@mvlcstaff.org>
Signed-off-by: Bill Erickson <berickxx@gmail.com>
---

diff --git a/Open-ILS/src/support-scripts/pingest.pl b/Open-ILS/src/support-scripts/pingest.pl
index 898dc1380c..73efaab727 100755
--- a/Open-ILS/src/support-scripts/pingest.pl
+++ b/Open-ILS/src/support-scripts/pingest.pl
@@ -152,7 +152,7 @@ if ($opt_pipe) {
         }
     }
 } else {
-    @input = ($dbh->selectall_arrayref($q));
+    @input = @{$dbh->selectall_arrayref($q)};
 }
 
 foreach my $r (@input) {