X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FLoader%2FRelBuilder%2FCompat%2Fv0_06.pm;h=1cad8a25e028187f9366b57875e145c7ec6ffbd6;hb=a6900c9127d90a9bec26228a16f68a11cc13fb1d;hp=8a016744d82f72e91f2f097af0da05480170dc48;hpb=19b7d71c67672e15f11ca6772963170fd6c6b588;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/lib/DBIx/Class/Schema/Loader/RelBuilder/Compat/v0_06.pm b/lib/DBIx/Class/Schema/Loader/RelBuilder/Compat/v0_06.pm index 8a01674..1cad8a2 100644 --- a/lib/DBIx/Class/Schema/Loader/RelBuilder/Compat/v0_06.pm +++ b/lib/DBIx/Class/Schema/Loader/RelBuilder/Compat/v0_06.pm @@ -2,23 +2,23 @@ package DBIx::Class::Schema::Loader::RelBuilder::Compat::v0_06; 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.07000'; +our $VERSION = '0.07039'; 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