X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FDeploymentHandler%2FVersionStorage%2FDeprecated.pm;h=de6abd1da038e270f487d7dcfe13a3be597d3c02;hb=b6bd39e5d75c994c09f3d0ae0661c572e1c71f05;hp=31471a8cc7c54d77daa8b39c91556e1a903b2646;hpb=0df68524a051e42f1a7f8606aee56e7c6b70b302;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm b/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm index 31471a8..de6abd1 100644 --- a/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm +++ b/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm @@ -1,17 +1,11 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Deprecated; use Moose; -use Log::Contextual::WarnLogger; -use Log::Contextual ':log', -default_logger => Log::Contextual::WarnLogger->new({ - env_prefix => 'DBICDH' -}); +use DBIx::Class::DeploymentHandler::LogImporter ':log'; # ABSTRACT: (DEPRECATED) Use this if you are stuck in the past -use Method::Signatures::Simple; - has schema => ( - isa => 'DBIx::Class::Schema', is => 'ro', required => 1, ); @@ -37,13 +31,13 @@ sub _build_version_rs { sub add_database_version { # deprecated doesn't support ddl or upgrade_ddl my $version = $_[1]->{version}; - log_debug { "[DBICDH] Adding database version $version" }; + log_debug { "Adding database version $version" }; $_[0]->version_rs->create({ version => $version }) } sub delete_database_version { my $version = $_[1]->{version}; - log_debug { "[DBICDH] Deleting database version $version" }; + log_debug { "Deleting database version $version" }; $_[0]->version_rs->search({ version => $version})->delete } @@ -85,3 +79,8 @@ new Standard VersionStorage: $dh->version_storage->add_database_vesion({ version => $_ }) for @versions; +=head1 SEE ALSO + +This class is an implementation of +L. Pretty much all the +documentation is there.