DBIx::Class::Schema::Loader::DBI
/;
use Carp::Clan qw/^DBIx::Class/;
-use Class::C3;
+use mro 'c3';
-our $VERSION = '0.07001';
+our $VERSION = '0.07002';
=head1 NAME
$result->{$col_name}{is_auto_increment} = 1;
if (my ($seq_schema, $seq_name) = $trigger_body =~ /(?:\."?(\w+)"?)?"?(\w+)"?\.nextval/i) {
- $seq_schema = $self->_lc($seq_schema) || $self->db_schema;
+ $seq_schema = $self->_lc($seq_schema || $self->db_schema);
$seq_name = $self->_lc($seq_name);
$result->{$col_name}{sequence} = ($self->qualify_objects ? ($seq_schema . '.') : '') . $seq_name;