add missing newline for no-linenumber-change dzil

[dbsrgits/DBIx-Class-DeploymentHandler.git] / lib / DBIx / Class / DeploymentHandler / HandlesVersionStorage.pm

diff --git a/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm b/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
index 9881817..aeba2c3 100644 (file)
--- a/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
+++ b/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
@@ -1,35 +1,67 @@
 package DBIx::Class::DeploymentHandler::HandlesVersionStorage;
+
 use Moose::Role;
 
-requires 'database_version';
+# ABSTRACT: Interface for version storage methods
+
 requires 'add_database_version';
+requires 'database_version';
 requires 'delete_database_version';
 requires 'version_storage_is_installed';
 
 1;
 
+# vim: ts=2 sw=2 expandtab
+
 __END__
 
-=method database_version
+=head1 DESCRIPTION
 
- my $db_version = $version_storage->database_version;
+Typically VersionStorages will be implemented with a simple
+DBIx::Class::Result.  Take a look at the
+L<two existing implementations|/KNOWN IMPLEMENTATIONS> for examples of what you
+might want to do in your own storage.
 
 =method add_database_version
 
- $version_storage->add_database_version({
-   version     => '1.2002',
-   ddl         => $ddl,     # optional
-   upgrade_sql => undef,    # optional
- })
+ $dh->add_database_version({
+   version     => '1.02',
+   ddl         => $ddl, # can be undef
+   upgrade_sql => $sql, # can be undef
+ });
+
+Store a new version into the version storage
+
+=method database_version
+
+ my $db_version = $version_storage->database_version
+
+Returns the most recently installed version in the database.
 
 =method delete_database_version
 
- $version_storage->delete_database_version({ version => '1.2002' })
+ $dh->delete_database_version({ version => '1.02' })
+
+Deletes given database version from the version storage
 
 =method version_storage_is_installed
 
- if ($verson_storage->version_storage_is_installed) {
-   say q(you're golden!)
- }
+ warn q(I can't version this database!)
+   unless $dh->version_storage_is_installed
+
+return true iff the version storage is installed.
+
+=head1 KNOWN IMPLEMENTATIONS
+
+=over
+
+=item *
+
+L<DBIx::Class::DeploymentHandler::VersionStorage::Standard>
+
+=item *
+
+L<DBIx::Class::DeploymentHandler::VersionStorage::Deprecated>
+
+=back
 
-vim: ts=2 sw=2 expandtab