X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class-DeploymentHandler.git;a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FDeploymentHandler%2FVersionStorage%2FDeprecated.pm;h=4bc65380ed55cf2e6d83800d4e74cd9861740ea6;hp=31471a8cc7c54d77daa8b39c91556e1a903b2646;hb=97aa9a748e07c9e5875d56bd7d6554e481911c5d;hpb=0df68524a051e42f1a7f8606aee56e7c6b70b302 diff --git a/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm b/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm index 31471a8..4bc6538 100644 --- a/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm +++ b/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm @@ -1,17 +1,12 @@ 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 +32,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 +80,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.