package DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator;
+
use Moose;
# ABSTRACT: Manage your SQL and Perl migrations in nicely laid out directories
s/^(?:BEGIN|BEGIN TRANSACTION|COMMIT).*//mgi;
# trim whitespaces
- s/^\s+|\s+$//mg;
+ s/^\s+//gm;
+ s/\s+$//gm;
# remove comments
s/^--.*//gm;
# remove blank lines
- s/^\n//mg;
+ s/^\n//gm;
# put on single line
s/\n/ /g;
}
- return @sql;
+ return grep $_, @sql;
}
sub _run_sql {
sub _load_sandbox {
my $_file = shift;
+ $_file = "$_file";
my $_package = $_file;
$_package =~ s/([^A-Za-z0-9_])/sprintf("_%2x", ord($1))/eg;
log_info { "deploying version $version" };
my $sqlt_type = $self->storage->sqlt_type;
my $sql;
+ my $sqltargs = $self->sql_translator_args;
if ($self->ignore_ddl) {
- $sql = $self->_sql_from_yaml({},
+ $sql = $self->_sql_from_yaml($sqltargs,
'_ddl_protoschema_deploy_consume_filenames', $sqlt_type
);
}
my @sql;
my $actual_file = $self->$from_file($version);
- for my $yaml_filename (@{
+ for my $yaml_filename (@{(
DlogS_trace { "generating SQL from Serialized SQL Files: $_" }
(ref $actual_file?$actual_file:[$actual_file])
- }) {
+ )}) {
my $sqlt = SQL::Translator->new({
add_drop_table => 0,
parser => 'SQL::Translator::Parser::YAML',
my $self = shift;
$self->prepare_protoschema({
# Exclude __VERSION so that it gets installed separately
- parser_args => { sources => [grep { $_ ne '__VERSION' } $self->schema->sources], }
+ parser_args => {
+ sources => [
+ sort { $a cmp $b }
+ grep { $_ ne '__VERSION' }
+ $self->schema->sources
+ ],
+ }
}, '_ddl_protoschema_produce_filename');
$self->_prepare_install({}, '_ddl_protoschema_produce_filename', '_ddl_schema_produce_filename');
}