lots more doc
[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;
189697a7 37 DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator->new({
a912450b 38 schema => $self->schema,
39 databases => $self->databases,
40 upgrade_directory => $self->upgrade_directory,
41 sqltargs => $self->sqltargs,
189697a7 42 });
8bf3eee1 43}
44
451;
e051bb00 46
e52174e3 47# vim: ts=2 sw=2 expandtab
e051bb00 48
e52174e3 49__END__