+++ /dev/null
-package DBIx::Class::Fixtures::SchemaVersioned;
-
-use strict;
-use warnings;
-
-use base 'DBIx::Class::Schema::Loader';
-
-our $VERSION = 'set-when-loading';
-
-__PACKAGE__->load_components('Schema::Versioned');
-__PACKAGE__->loader_options(
- # debug => 1,
- );
-
-sub schema_version {
- return $DBIx::Class::Fixtures::SchemaVersioned::VERSION;
-}
-1;
+++ /dev/null
-package DBIx::Class::Fixtures::Versioned;
-
-use strict;
-use warnings;
-
-use base qw/DBIx::Class::Fixtures/;
-use DBIx::Class::Fixtures::SchemaVersioned;
-use Class::C3;
-
-=head1 NAME
-
-DBIx::Class::Fixtures::Versioned
-
-=head1 DESCRIPTION
-
-Just ignore it for now, but it will vaguely tie in to DBIx::Class::Schema::Versioned's functionality eventually.
-
-=cut
-
-sub populate {
- my $self = shift;
- my ($params) = @_;
-
- $self->schema_class("DBIx::Class::Fixtures::SchemaVersioned");
- unless ($params->{version}) {
- return DBIx::Class::Exception->throw('You must pass a version to populate');
- }
- return $self->next::method(@_);
-}
-
-sub _generate_schema {
- my $self = shift;
- my ($params) = @_;
-
- # manually set the schema version
- $DBIx::Class::Fixtures::SchemaVersioned::VERSION = $params->{version};
-
- my $schema = $self->next::method(@_);
-
- # set the db version to the schema version
- $schema->upgrade(); # set version number
- return $schema;
-}
-
-1;