[Bast-commits] r7000 - DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-07-07 11:34:23 +0000 (Tue, 07 Jul 2009)
New Revision: 7000

Modified:
   DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI/Sybase.pm
Log:
fix sybase rebless to NoBindVars

Modified: DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI/Sybase.pm
===================================================================
--- DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI/Sybase.pm	2009-07-07 06:42:01 UTC (rev 6999)
+++ DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI/Sybase.pm	2009-07-07 11:34:23 UTC (rev 7000)
@@ -60,7 +60,8 @@
     } else {
       # real Sybase
       if (not $self->dbh->{syb_dynamic_supported}) {
-        bless $self, 'DBIx::Class::Storage:DBI::Sybase::NoBindVars';
+        $self->ensure_class_loaded('DBIx::Class::Storage::DBI::Sybase::NoBindVars');
+        bless $self, 'DBIx::Class::Storage::DBI::Sybase::NoBindVars';
         $self->_rebless;
       }
     }