X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FDeploymentHandler%2FVersionStorage%2FStandard.pm;h=b1af275b395a1f8a6b424886979ad5b611205886;hb=refs%2Fheads%2Fmoo-port;hp=cc79c4f85c13355cc1ff233d22aad035a54aced3;hpb=c4f51462ef3831ad5e95b53de672a853014576dc;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm b/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm index cc79c4f..b1af275 100644 --- a/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm +++ b/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm @@ -1,24 +1,19 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Standard; -use Moose; -use DBIx::Class::DeploymentHandler::Logger; -use Log::Contextual ':log', -package_logger => - DBIx::Class::DeploymentHandler::Logger->new({ - env_prefix => 'DBICDH' - }); +use Moo; +use DBIx::Class::DeploymentHandler::LogImporter ':log'; +use DBIx::Class::DeploymentHandler::Types 'ResultSet'; # ABSTRACT: Version storage that does the normal stuff -use Method::Signatures::Simple; use DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResult; has schema => ( - isa => 'DBIx::Class::Schema', is => 'ro', required => 1, ); has version_rs => ( - isa => 'DBIx::Class::ResultSet', + isa => ResultSet, is => 'ro', builder => '_build_version_rs', handles => [qw( database_version version_storage_is_installed )], @@ -46,11 +41,14 @@ sub delete_database_version { $_[0]->version_rs->search({ version => $version})->delete } -__PACKAGE__->meta->make_immutable; - 1; # vim: ts=2 sw=2 expandtab __END__ +=head1 SEE ALSO + +This class is an implementation of +L. Pretty much all the +documentation is there.