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

   1 package DBIx::Class::DeploymentHandler::Deprecated::WithDeprecatedSqltDeployMethod;
   2 use Moose::Role;
   3
   4 # ABSTRACT: (DEPRECATED) Use this if you are stuck in the past
   5
   6 use DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated;
   7
   8 has deploy_method => (
   9   does => 'DBIx::Class::DeploymentHandler::HandlesDeploy',
  10   is  => 'ro',
  11   lazy_build => 1,
  12   handles =>  'DBIx::Class::DeploymentHandler::HandlesDeploy',
  13 );
  14
  15 has upgrade_directory => (
  16   isa      => 'Str',
  17   is       => 'ro',
  18   required => 1,
  19   default  => 'sql',
  20 );
  21
  22 has databases => (
  23   coerce  => 1,
  24   isa     => 'DBIx::Class::DeploymentHandler::Databases',
  25   is      => 'ro',
  26   default => sub { [qw( MySQL SQLite PostgreSQL )] },
  27 );
  28
  29 has sql_translator_args => (
  30   isa => 'HashRef',
  31   is  => 'ro',
  32   default => sub { {} },
  33 );
  34
  35 sub _build_deploy_method {
  36   my $self = shift;
  37   DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated->new({
  38     schema              => $self->schema,
  39     databases           => $self->databases,
  40     upgrade_directory   => $self->upgrade_directory,
  41     sql_translator_args => $self->sql_translator_args,
  42   });
  43 }
  44
  45 1;
  46
  47 # vim: ts=2 sw=2 expandtab
  48
  49 __END__
  50