lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm

   1 package DBIx::Class::DeploymentHandler::HandlesVersionStorage;
   2 use Moose::Role;
   3
   4 requires 'database_version';
   5 requires 'add_database_version';
   6 requires 'delete_database_version';
   7 requires 'version_storage_is_installed';
   8
   9 1;
  10
  11 __END__
  12
  13 =method database_version
  14
  15  my $db_version = $version_storage->database_version;
  16
  17 =method add_database_version
  18
  19  $version_storage->add_database_version({
  20    version     => '1.2002',
  21    ddl         => $ddl,     # optional
  22    upgrade_sql => undef,    # optional
  23  })
  24
  25 =method delete_database_version
  26
  27  $version_storage->delete_database_version({ version => '1.2002' })
  28
  29 =method version_storage_is_installed
  30
  31  if ($verson_storage->version_storage_is_installed) {
  32    say q(you're golden!)
  33  }
  34
  35 vim: ts=2 sw=2 expandtab