lib/DBIx/Class/DeploymentHandler/WithSqltDeployMethod.pm

   1 package DBIx::Class::DeploymentHandler::WithSqltDeployMethod;
   2 use Moose::Role;
   3
   4 use DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator;
   5
   6 has deploy_method => (
   7   does => 'DBIx::Class::DeploymentHandler::HandlesDeploy',
   8   is  => 'ro',
   9   lazy_build => 1,
  10   handles =>  'DBIx::Class::DeploymentHandler::HandlesDeploy',
  11 );
  12
  13 sub _build_deploy_method {
  14   my $self = shift;
  15   DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator->new({
  16     schema            => $self->schema,
  17     databases         => $self->databases,
  18     upgrade_directory => $self->upgrade_directory,
  19     sqltargs          => $self->sqltargs,
  20   });
  21 }
  22
  23 1;
  24
  25 __END__
  26
  27 vim: ts=2 sw=2 expandtab