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};
use base qw/
DBIx::Class::Storage::DBI::Sybase::Base
DBIx::Class::Storage::DBI::MSSQL
- DBIx::Class::Storage::DBI::NoBindVars
/;
use mro 'c3';
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;