From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Thu, 6 May 2010 04:56:15 +0000 (-0500)
Subject: git rid of some useless roles
X-Git-Tag: v0.001000_07~21
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class-DeploymentHandler.git;a=commitdiff_plain;h=3b9738c4cf9d2e057938c52ca15e3bf2b4bdce67

git rid of some useless roles
---

diff --git a/lib/DBIx/Class/DeploymentHandler/WithMonotonicVersions.pm b/lib/DBIx/Class/DeploymentHandler/WithMonotonicVersions.pm
deleted file mode 100644
index f94988e..0000000
--- a/lib/DBIx/Class/DeploymentHandler/WithMonotonicVersions.pm
+++ /dev/null
@@ -1,37 +0,0 @@
-package DBIx::Class::DeploymentHandler::WithMonotonicVersions;
-use Moose::Role;
-
-# ABSTRACT: Delegate/Role for DBIx::Class::DeploymentHandler::VersionHandler::Monotonic
-
-use DBIx::Class::DeploymentHandler::VersionHandler::Monotonic;
-
-has version_handler => (
-  is         => 'ro',
-  lazy_build => 1,
-  does       => 'DBIx::Class::DeploymentHandler::HandlesVersioning',
-  handles    => 'DBIx::Class::DeploymentHandler::HandlesVersioning',
-);
-
-sub _build_version_handler {
-  my $self = shift;
-
-  my $args = {
-    database_version => $self->database_version,
-    schema_version   => $self->schema_version,
-  };
-
-  $args->{to_version} = $self->to_version if $self->has_to_version;
-  DBIx::Class::DeploymentHandler::VersionHandler::Monotonic->new($args);
-}
-
-1;
-
-# vim: ts=2 sw=2 expandtab
-
-__END__
-
-=head1 DELEGATION ROLE
-
-This role is entirely for making delegation look like a role.  The actual
-docs for the methods and attributes are at
-L<DBIx::Class::DeploymentHandler::VersionHandler::Monotonic>
diff --git a/lib/DBIx/Class/DeploymentHandler/WithStandardVersionStorage.pm b/lib/DBIx/Class/DeploymentHandler/WithStandardVersionStorage.pm
deleted file mode 100644
index 499dde9..0000000
--- a/lib/DBIx/Class/DeploymentHandler/WithStandardVersionStorage.pm
+++ /dev/null
@@ -1,30 +0,0 @@
-package DBIx::Class::DeploymentHandler::WithStandardVersionStorage;
-use Moose::Role;
-
-# ABSTRACT: Delegate/Role for DBIx::Class::DeploymentHandler::VersionStorage::Standard
-
-use DBIx::Class::DeploymentHandler::VersionStorage::Standard;
-
-has version_storage => (
-  does => 'DBIx::Class::DeploymentHandler::HandlesVersionStorage',
-  is  => 'ro',
-  builder => '_build_version_storage',
-  handles =>  'DBIx::Class::DeploymentHandler::HandlesVersionStorage',
-);
-
-sub _build_version_storage {
-  DBIx::Class::DeploymentHandler::VersionStorage::Standard
-    ->new({ schema => $_[0]->schema });
-}
-
-1;
-
-# vim: ts=2 sw=2 expandtab
-
-__END__
-
-=head1 DELEGATION ROLE
-
-This role is entirely for making delegation look like a role.  The actual
-docs for the methods and attributes are at
-L<DBIx::Class::DeploymentHandler::VersionStorage::Standard>