lib/DBIx/Class/DeploymentHandler/Deprecated/WithDeprecatedVersionStorage.pm

   1 package DBIx::Class::DeploymentHandler::Deprecated::WithDeprecatedVersionStorage;
   2 use Moose::Role;
   3
   4 # ABSTRACT: (DEPRECATED) Use this if you are stuck in the past
   5
   6 use DBIx::Class::DeploymentHandler::VersionStorage::Deprecated;
   7
   8 has version_storage => (
   9   does => 'DBIx::Class::DeploymentHandler::HandlesVersionStorage',
  10   is  => 'ro',
  11   builder => '_build_version_storage',
  12   handles =>  'DBIx::Class::DeploymentHandler::HandlesVersionStorage',
  13 );
  14
  15 sub _build_version_storage {
  16   DBIx::Class::DeploymentHandler::VersionStorage::Deprecated
  17     ->new({ schema => $_[0]->schema });
  18 }
  19
  20 1;
  21
  22 # vim: ts=2 sw=2 expandtab
  23
  24 __END__
  25
  26 =head1 DEPRECATED
  27
  28 This component has been suplanted by
  29 L<DBIx::Class::DeploymentHandler::WithStandardVersionStorage>.
  30 In the next major version (1) we will begin issuing a warning on it's use.
  31 In the major version after that (2) we will remove it entirely.
  32
  33 =head1 DELEGATION ROLE
  34
  35 This role is entirely for making delegation look like a role.  The actual
  36 docs for the methods and attributes are at
  37 L<DBIx::Class::DeploymentHandler::VersionStorage::Deprecated>