use strict;
use warnings;
-use Class::C3;
-use base 'DBIx::Class::Schema::Loader::RelBuilder';
-use Carp::Clan qw/^DBIx::Class/;
-use Lingua::EN::Inflect::Phrase ();
+use base 'DBIx::Class::Schema::Loader::RelBuilder::Compat::v0_07';
+use mro 'c3';
-our $VERSION = '0.07001';
+our $VERSION = '0.07032';
sub _normalize_name {
my ($self, $name) = @_;
+ $name = $self->_sanitize_name($name);
+
return lc $name;
}
=head1 NAME
DBIx::Class::Schema::Loader::RelBuilder::Compat::v0_06 - RelBuilder for
-compatibility with DBIx::Class::Schema::Loader version 0.06001
+compatibility with DBIx::Class::Schema::Loader version 0.06000
=head1 DESCRIPTION