From: Arthur Axel 'fREW' Schmidt Date: Fri, 2 Apr 2010 15:14:09 +0000 (-0500) Subject: tiny bits of cleanup X-Git-Tag: v0.001000_01~16 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a65184c855392d390489326e8363ffbe9a0e7fee;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git tiny bits of cleanup --- diff --git a/lib/DBIx/Class/DeploymentHandler.pm b/lib/DBIx/Class/DeploymentHandler.pm index 3f6a154..394a16e 100644 --- a/lib/DBIx/Class/DeploymentHandler.pm +++ b/lib/DBIx/Class/DeploymentHandler.pm @@ -1,5 +1,7 @@ package DBIx::Class::DeploymentHandler; +# ABSTRACT: Extensible DBIx::Class deployment + use Moose; extends 'DBIx::Class::DeploymentHandler::Dad'; @@ -30,9 +32,7 @@ __PACKAGE__->meta->make_immutable; 1; -__END__ - -=SYNOPSIS +=head1 SYNOPSIS use aliased 'DBIx::Class::DeploymentHandler' => 'DH'; my $s = My::Schema->connect(...); diff --git a/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm b/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm index cc37175..5084bf8 100644 --- a/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm +++ b/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm @@ -427,10 +427,13 @@ __PACKAGE__->meta->make_immutable; __END__ =attr schema + =attr storage + =attr sqltargs #rename + =attr upgrade_directory The directory (default C<'sql'>) that upgrades are stored in @@ -443,26 +446,43 @@ generate files for =attr txn_wrap =method __ddl_consume_with_prefix + =method _ddl_schema_consume_filenames + =method _ddl_schema_produce_filename + =method _ddl_schema_up_consume_filenames + =method _ddl_schema_down_consume_filenames + =method _ddl_schema_up_produce_filenames + =method _ddl_schema_down_produce_filenames + =method _resultsource_install_filename + =method _run_sql_and_perl =method _prepare_install + =method _prepare_changegrade + =method _read_sql_file =method deploy + =method install_resultsource + =method prepare_resultsouce_install + =method prepare_install + =method prepare_upgrade + =method prepare_downgrade + =method upgrade_single_step + =method downgrade_single_step vim: ts=2 sw=2 expandtab diff --git a/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm b/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm index ffdb444..f52f8de 100644 --- a/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm +++ b/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm @@ -8,6 +8,9 @@ requires 'version_storage_is_installed'; 1; +# vim: ts=2 sw=2 expandtab + +__END__ =head1 DESCRIPTION @@ -57,6 +60,3 @@ L =back -__END__ - -vim: ts=2 sw=2 expandtab diff --git a/t/03-deprecated.t b/t/03-deprecated.t index 288299f..00fcb52 100644 --- a/t/03-deprecated.t +++ b/t/03-deprecated.t @@ -1,5 +1,8 @@ #!perl +use strict; +use warnings; + use lib 't/lib'; use DBICDHTest; use aliased 'DBIx::Class::DeploymentHandler::Deprecated'; @@ -14,8 +17,6 @@ my $db = 'dbi:SQLite:db.db'; my @connection = ($db, '', '', { ignore_version => 1 }); my $sql_dir = 't/sql'; -ready; - VERSION1: { use_ok 'DBICVersion_v1'; my $s = DBICVersion::Schema->connect(@connection);