[open-ils-commits] r14153 - branches/rel_1_4_0/Open-ILS/src/reporter (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2009-09-24 13:08:55 -0400 (Thu, 24 Sep 2009)
New Revision: 14153

Modified:
   branches/rel_1_4_0/Open-ILS/src/reporter/clark-kent.pl
Log:
backporting 1.4 version of r13983: turn off array expansion in DBD::Pg (new feature that is on by default, and we do not want it)

Modified: branches/rel_1_4_0/Open-ILS/src/reporter/clark-kent.pl
===================================================================
--- branches/rel_1_4_0/Open-ILS/src/reporter/clark-kent.pl	2009-09-24 17:07:09 UTC (rev 14152)
+++ branches/rel_1_4_0/Open-ILS/src/reporter/clark-kent.pl	2009-09-24 17:08:55 UTC (rev 14153)
@@ -83,7 +83,7 @@
 
 DAEMON:
 
-$dbh = DBI->connect($dsn,$db_user,$db_pw, {AutoCommit => 1, pg_enable_utf8 => 1, RaiseError => 1});
+$dbh = DBI->connect($dsn,$db_user,$db_pw, {AutoCommit => 1, pg_expand_array => 0, pg_enable_utf8 => 1, RaiseError => 1});
 
 $current_time = DateTime->from_epoch( epoch => time() )->strftime('%FT%T%z');
 
@@ -156,7 +156,7 @@
 	# This is the child (runner) process;
 	daemonize("Clark Kent reporting: $r->{report}->{name}");
 
-	$dbh = DBI->connect($dsn,$db_user,$db_pw, {AutoCommit => 1, pg_enable_utf8 => 1, RaiseError => 1});
+	$dbh = DBI->connect($dsn,$db_user,$db_pw, {AutoCommit => 1, pg_expand_array => 0, pg_enable_utf8 => 1, RaiseError => 1});
 
 	try {
 		$dbh->do(<<'		SQL',{}, $r->{id});