test cases for recent changes and test DBs other than mysql
[dbsrgits/DBIx-Class-DeploymentHandler.git] / lib / DBIx / Class / DeploymentHandler / MigrationSchema / FromCurrent.pm
1 package DBIx::Class::DeploymentHandler::MigrationSchema::FromCurrent;
2
3 use Moose;
4 with 'DBIx::Class::DeploymentHandler::HandlesMigrationSchema';
5
6 has schema => (is=>'ro', required=>1);
7
8 sub migration_schema { shift->schema }
9
10 1;
11
12 # vim: ts=2 sw=2 expandtab
13
14 __END__
15
16 =method migration_schema
17
18   my $schema = $dh->migration_schema;
19
20 Provides a L<DBIx::Class::Schema> object that we can pass to the Perl deploy
21 scripts.  We just return whatever C<$schema> you passed when you instantiated
22 the L<DBIx::Class::DeploymentHandler> object.