use strict;
use warnings;
-use base qw/DBIx::Class::Storage::DBI::MultiColumnIn DBIx::Class::Storage::DBI::AmbiguousGlob/;
+use base qw/
+ DBIx::Class::Storage::DBI::MultiColumnIn
+ DBIx::Class::Storage::DBI::AmbiguousGlob
+ DBIx::Class::Storage::DBI
+/;
+use mro 'c3';
__PACKAGE__->sql_maker_class('DBIx::Class::SQLAHacks::MySQL');
$self->dbh->do('SET foreign_key_checks=1');
}
+sub connect_call_set_ansi_mode {
+ my $self = shift;
+ $self->dbh->do(q|SET sql_mode = 'ANSI,TRADITIONAL'|);
+ $self->dbh->do(q|SET sql_mode = 'ANSI,TRADITIONAL'|);
+}
+
sub _dbh_last_insert_id {
my ($self, $dbh, $source, $col) = @_;
$dbh->{mysql_insertid};