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=f25223c5f6b5ada6d56d5dcb5453f3816ea429f4;hb=c34033b1f21ade200b20f78940c2c32a8843fd17;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..f25223c 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.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