fix a couple minor issues after pull from trunk
Rafael Kitover [Wed, 5 Aug 2009 09:02:26 +0000 (09:02 +0000)]
lib/DBIx/Class/Storage/DBI/Cursor.pm
lib/DBIx/Class/Storage/DBI/Sybase/Microsoft_SQL_Server.pm

index d1f1c6e..c4c9806 100644 (file)
@@ -128,7 +128,7 @@ sub _dbh_all {
   my ($storage, $dbh, $self) = @_;
 
   $self->_check_dbh_gen;
-  $self->sth->finish if $self->sth->{Active};
+  $self->sth->finish if $self->sth && $self->sth->{Active};
   $self->sth(undef);
   my ($rv, $sth) = $storage->_select(@{$self->{args}});
   return @{$sth->fetchall_arrayref};
index 7e19816..9926b74 100644 (file)
@@ -6,7 +6,6 @@ use warnings;
 use base qw/
   DBIx::Class::Storage::DBI::Sybase::Base
   DBIx::Class::Storage::DBI::MSSQL
-  DBIx::Class::Storage::DBI::NoBindVars
 /;
 use mro 'c3';
 
@@ -14,7 +13,7 @@ sub _rebless {
   my $self = shift;
   my $dbh  = $self->_dbh;
 
-  if (not $self->_placeholders_supported) {
+  if (not $self->placeholders_with_type_conversion_supported) {
     bless $self,
       'DBIx::Class::Storage::DBI::Sybase::Microsoft_SQL_Server::NoBindVars';
     $self->_rebless;