From 7c276e482ea910704c27b233c9b770d4828b7ce0 Mon Sep 17 00:00:00 2001 From: miker Date: Thu, 24 Sep 2009 17:08:55 +0000 Subject: [PATCH] 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) git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4_0@14153 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/reporter/clark-kent.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/reporter/clark-kent.pl b/Open-ILS/src/reporter/clark-kent.pl index 55715ef3aa..5b95179c13 100755 --- a/Open-ILS/src/reporter/clark-kent.pl +++ b/Open-ILS/src/reporter/clark-kent.pl @@ -83,7 +83,7 @@ if ($daemon) { 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 @@ for my $r ( @reports ) { # 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}); -- 2.11.0