1 package DBIx::Class::DeploymentHandler::WithSqltDeployMethod;
4 use DBIx::Class::DeploymentHandler::SqltDeployMethod;
10 # < mst> isa => 'DBIx::Class::DeploymentHandler::SqltDeployMethod',
12 # < mst> does => <some role>
13 # < mst> and that role should supply those methods
14 # < mst> then you can pass handles => <some role> as well
16 isa => 'DBIx::Class::DeploymentHandler::SqltDeployMethod',
29 sub _build_deploy_method {
32 schema => $self->schema,
33 databases => $self->databases,
34 upgrade_directory => $self->upgrade_directory,
35 sqltargs => $self->sqltargs,
36 do_backup => $self->do_backup,
38 $args->{backup_directory} = $self->backup_directory
39 if $self->has_backup_directory;
40 DBIx::Class::DeploymentHandler::SqltDeployMethod->new($args);
47 vim: ts=2 sw=2 expandtab