lib/DBIx/Class/Schema/Loader/RelBuilder/Compat/v0_06.pm

   1 package DBIx::Class::Schema::Loader::RelBuilder::Compat::v0_06;
   2
   3 use strict;
   4 use warnings;
   5 use mro 'c3';
   6 use base 'DBIx::Class::Schema::Loader::RelBuilder';
   7 use Carp::Clan qw/^DBIx::Class/;
   8 use Lingua::EN::Inflect::Phrase ();
   9
  10 our $VERSION = '0.07004';
  11
  12 sub _normalize_name {
  13     my ($self, $name) = @_;
  14
  15     $name = $self->_sanitize_name($name);
  16
  17     return lc $name;
  18 }
  19
  20 =head1 NAME
  21
  22 DBIx::Class::Schema::Loader::RelBuilder::Compat::v0_06 - RelBuilder for
  23 compatibility with DBIx::Class::Schema::Loader version 0.06001
  24
  25 =head1 DESCRIPTION
  26
  27 See L<DBIx::Class::Schema::Loader::Base/naming> and
  28 L<DBIx::Class::Schema::Loader::RelBuilder>.
  29
  30 =head1 AUTHOR
  31
  32 See L<DBIx::Class::Schema::Loader/AUTHOR> and L<DBIx::Class::Schema::Loader/CONTRIBUTORS>.
  33
  34 =head1 LICENSE
  35
  36 This library is free software; you can redistribute it and/or modify it under
  37 the same terms as Perl itself.
  38
  39 =cut
  40
  41 1;
  42 # vim:et sts=4 sw=4 tw=0: