X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FDeploymentHandler%2FHandlesVersionStorage.pm;h=9f8cfac4f1e12e81a3679257c1b058e874733348;hb=f08935ea886d2f908ac7b8210f0970de5c17fb0b;hp=ffdb444e51dbd81e61ee0b22b3645076a7a78ecf;hpb=ed1721b92e5774426f63bbf69bc4b2c997fbf62e;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git

diff --git a/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm b/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
index ffdb444..9f8cfac 100644
--- a/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
+++ b/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm
@@ -1,6 +1,8 @@
 package DBIx::Class::DeploymentHandler::HandlesVersionStorage;
 use Moose::Role;
 
+# ABSTRACT: Interface for version storage methods
+
 requires 'add_database_version';
 requires 'database_version';
 requires 'delete_database_version';
@@ -8,6 +10,9 @@ requires 'version_storage_is_installed';
 
 1;
 
+# vim: ts=2 sw=2 expandtab
+
+__END__
 
 =head1 DESCRIPTION
 
@@ -20,21 +25,23 @@ might want to do in your own storage.
 
  $dh->add_database_version({
    version     => '1.02',
-   ddl         => $ddl # can be undef,
-   upgrade_sql => $sql # can be undef,
+   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;
+ my $db_version = $version_storage->database_version
+
+Returns the most recently installed version in the database.
 
 =method delete_database_version
 
  $dh->delete_database_version({ version => '1.02' })
 
-simply deletes given database version from the version storage
+Deletes given database version from the version storage
 
 =method version_storage_is_installed
 
@@ -57,6 +64,3 @@ L<DBIx::Class::DeploymentHandler::VersionStorage::Deprecated>
 
 =back
 
-__END__
-
-vim: ts=2 sw=2 expandtab