[svn:p5ee] r14701 - p5ee/trunk/App-Repository/lib/App/Repository

[email protected] Thu, 10 Feb 2011 11:38:54 -0800 (PST)
Newsgroups perl.cvs.p5ee
Message-ID <[email protected]>
Author: spadkins
Date: Thu Feb 10 11:38:54 2011
New Revision: 14701

Modified:
   p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm
   p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm

Log:
set dbh attributes to PrintWarn => 0 (needed to silence unique index violations in execute_array() with an insert statement in Oracle)

Modified: p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm	(original)
+++ p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm	Thu Feb 10 11:38:54 2011
@@ -255,6 +255,7 @@
     &App::sub_entry if ($App::trace);
     my $attr = {
         PrintError         => 0,
+        PrintWarn          => 0,
         AutoCommit         => 1,
         RaiseError         => 1,
         FetchHashKeyName   => 'NAME_lc',

Modified: p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm	(original)
+++ p5ee/trunk/App-Repository/lib/App/Repository/Oracle.pm	Thu Feb 10 11:38:54 2011
@@ -107,6 +107,7 @@
     my $long_read_len = $self->{long_read_len} || 4000;
     my $attr = {
         PrintError         => 0,
+        PrintWarn          => 0,
         AutoCommit         => 1,
         RaiseError         => 1,
         FetchHashKeyName   => 'NAME_lc',