use mro 'c3';
use Scalar::Util 'reftype';
use Try::Tiny;
-use Carp::Clan qw/^DBIx::Class/;
+use DBIx::Class::Carp;
use namespace::clean;
__PACKAGE__->mk_group_accessors(simple => qw/
$dsn = '' if ref $dsn eq 'CODE';
- my $dbh = $self->_get_dbh;
-
return 1 if $dsn =~ /driver=FreeTDS/i
- || (try { $dbh->get_info(6) }||'') =~ /tdsodbc/i;
+ || ($self->_dbh_get_info(6)||'') =~ /tdsodbc/i;
return 0;
}