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