package DBIx::Class::DeploymentHandler::VersionStorage::Standard;
use Moose;
-use Log::Contextual::WarnLogger;
-use Log::Contextual ':log', -default_logger => Log::Contextual::WarnLogger->new({
- env_prefix => 'DBICDH'
-});
+use DBIx::Class::DeploymentHandler::Logger;
+use Log::Contextual ':log', -package_logger =>
+ DBIx::Class::DeploymentHandler::Logger->new({
+ env_prefix => 'DBICDH'
+ });
# 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,
);
sub add_database_version {
my $version = $_[1]->{version};
- log_debug { "[DBICDH] Adding database version $version" };
+ log_debug { "Adding database version $version" };
$_[0]->version_rs->create($_[1])
}
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
}
__END__
+=head1 SEE ALSO
+
+This class is an implementation of
+L<DBIx::Class::DeploymentHandler::HandlesVersionStorage>. Pretty much all the
+documentation is there.