spread TODOs out
[dbsrgits/DBIx-Class-DeploymentHandler.git] / lib / DBIx / Class / DeploymentHandler / WithSqltDeployMethod.pm
CommitLineData
8bf3eee1 1package DBIx::Class::DeploymentHandler::WithSqltDeployMethod;
2use Moose::Role;
3
9deabd1f 4# ABSTRACT: Delegate/Role for DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator
5
45d0d9d5 6use DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator;
8bf3eee1 7
8has deploy_method => (
7521a845 9 does => 'DBIx::Class::DeploymentHandler::HandlesDeploy',
8bf3eee1 10 is => 'ro',
11 lazy_build => 1,
7521a845 12 handles => 'DBIx::Class::DeploymentHandler::HandlesDeploy',
8bf3eee1 13);
14
cfc9edf9 15has upgrade_directory => (
16 isa => 'Str',
17 is => 'ro',
18 required => 1,
19 default => 'sql',
20);
21
22has databases => (
23 coerce => 1,
24 isa => 'DBIx::Class::DeploymentHandler::Databases',
25 is => 'ro',
26 default => sub { [qw( MySQL SQLite PostgreSQL )] },
27);
28
29has sqltargs => (
30 isa => 'HashRef',
31 is => 'ro',
32 default => sub { {} },
33);
34
8bf3eee1 35sub _build_deploy_method {
a912450b 36 my $self = shift;
73caa630 37 my $args = {
a912450b 38 schema => $self->schema,
39 databases => $self->databases,
40 upgrade_directory => $self->upgrade_directory,
41 sqltargs => $self->sqltargs,
73caa630 42 };
43
44 $args->{schema_version} = $self->schema_version if $self->has_schema_version;
45 DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator->new($args);
8bf3eee1 46}
47
481;
e051bb00 49
e52174e3 50# vim: ts=2 sw=2 expandtab
e051bb00 51
e52174e3 52__END__
73caa630 53
54TODO: pod