tiny bits of cleanup
Arthur Axel 'fREW' Schmidt [Fri, 2 Apr 2010 15:14:09 +0000 (10:14 -0500)]
lib/DBIx/Class/DeploymentHandler.pm
lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm
lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
t/03-deprecated.t

index 3f6a154..394a16e 100644 (file)
@@ -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(...);
index cc37175..5084bf8 100644 (file)
@@ -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
index ffdb444..f52f8de 100644 (file)
@@ -8,6 +8,9 @@ requires 'version_storage_is_installed';
 
 1;
 
+# vim: ts=2 sw=2 expandtab
+
+__END__
 
 =head1 DESCRIPTION
 
@@ -57,6 +60,3 @@ L<DBIx::Class::DeploymentHandler::VersionStorage::Deprecated>
 
 =back
 
-__END__
-
-vim: ts=2 sw=2 expandtab
index 288299f..00fcb52 100644 (file)
@@ -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);