[Bast-commits] r7911 - DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-11-15 17:31:37 +0000 (Sun, 15 Nov 2009)
New Revision: 7911

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI/Sybase.pm
Log:
fix MSSQL via DBD::Sybase regression

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI/Sybase.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI/Sybase.pm	2009-11-15 13:18:19 UTC (rev 7910)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI/Sybase.pm	2009-11-15 17:31:37 UTC (rev 7911)
@@ -191,6 +191,8 @@
 
   $self->next::method(@_);
 
+  return unless $self->_driver_determined; # otherwise we screw up MSSQL
+
   if ($self->_is_bulk_storage) {
 # this should be cleared on every reconnect
     $self->_began_bulk_work(0);