[PATCH] testbot: Don't rely on the DBI defaults.

[Francois Gouget]

Signed-off-by: Francois Gouget 
---
 testbot/lib/ObjectModel/DBIBackEnd.pm | 3 +++
 testbot/lib/WineTestBot/Config.pm     | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/testbot/lib/ObjectModel/DBIBackEnd.pm b/testbot/lib/ObjectModel/DBIBackEnd.pm
index b5bb485e..5567203b 100644
--- a/testbot/lib/ObjectModel/DBIBackEnd.pm
+++ b/testbot/lib/ObjectModel/DBIBackEnd.pm
@@ -608,6 +608,9 @@ sub UseDBIBackEnd($$$$$$)
 {
   my ($class, $DbSelector, $DbSource, $DbUser, $DbPassword, $DbArgs) = @_;

+  # The implementation assumes AutoCommit is on.
+  $DbArgs->{AutoCommit} = 1;
+
   my $BackEnd = $class->new();
   $BackEnd->{ConnectArgs} = [$DbSource, $DbUser, $DbPassword, $DbArgs];
   AddDBBackEnd($DbSelector, $BackEnd);
diff --git a/testbot/lib/WineTestBot/Config.pm b/testbot/lib/WineTestBot/Config.pm
index b1024b5c..9d7e2009 100644
--- a/testbot/lib/WineTestBot/Config.pm
+++ b/testbot/lib/WineTestBot/Config.pm
@@ -122,7 +122,7 @@ if (!$::BuildEnv)
   require ObjectModel::DBIBackEnd;
   ObjectModel::DBIBackEnd->UseDBIBackEnd('WineTestBot', $DbDataSource,
                                          $DbUsername, $DbPassword,
-                                         { RaiseError => 1 });
+                                         { PrintError => 1, RaiseError => 1});
 }

umask 002;