From: Rafael Kitover <rkitover@cpan.org>
Date: Sat, 24 Mar 2012 04:07:41 +0000 (-0400)
Subject: Disable ODBC batch ops for Access, they are broken
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1d8a370f73b67947351d86da4111b306de167aca;p=dbsrgits%2FDBIx-Class-Historic.git

Disable ODBC batch ops for Access, they are broken
---

diff --git a/Changes b/Changes
index 2a4216b..08675d9 100644
--- a/Changes
+++ b/Changes
@@ -29,6 +29,7 @@ Revision history for DBIx::Class
           for the following drivers too buggy to handle the optimized path:
           - FreeTDS ODBC driver (when used with MSSQL)
           - The Firebird ODBC driver
+          - The MSAccess ODBC driver
         - Explicitly disable DBD::ODBC dynamic_cursors when using freetds 0.83
           or later - they made enough ODBC incompatible changes making it
           impossible to support sanely
diff --git a/lib/DBIx/Class/Storage/DBI/ODBC/ACCESS.pm b/lib/DBIx/Class/Storage/DBI/ODBC/ACCESS.pm
index 2a0624f..f2bbb64 100644
--- a/lib/DBIx/Class/Storage/DBI/ODBC/ACCESS.pm
+++ b/lib/DBIx/Class/Storage/DBI/ODBC/ACCESS.pm
@@ -65,6 +65,9 @@ sub _run_connection_actions {
     $self->_dbh->{LongReadLen} = $long_read_len * 2 + 1;
   }
 
+  # batch operations do not work
+  $self->_get_dbh->{odbc_disable_array_operations} = 1;
+
   return $self->next::method(@_);
 }