lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/Deprecated.pm

   1 package DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated;
   2 use Moose;
   3 use Method::Signatures::Simple;
   4
   5 extends 'DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator',
   6
   7 method _ddl_schema_filename($type, $version, $dir) {
   8   my $filename = ref $self->schema;
   9   $filename =~ s/::/-/g;
  10
  11   $filename = File::Spec->catfile(
  12     $dir, "$filename-schema-$version-$type.sql"
  13   );
  14
  15   return [$filename];
  16 }
  17
  18 method _ddl_schema_diff_filename($type, $versions, $dir) {
  19   my $filename = ref $self->schema;
  20   $filename =~ s/::/-/g;
  21
  22   $filename = File::Spec->catfile(
  23     $dir, "$filename-diff-" . join( q(-), @{$versions} ) . "-$type.sql"
  24   );
  25
  26   return [$filename];
  27 }
  28
  29 1;