use DBIx::Class::Schema::Loader;
my $tempdir = tempdir( CLEANUP => 1 );
-my $foopm = File::Spec->catfile( $tempdir, qw| DBICTest Schema Overwrite_modifications Foo.pm |);
+my $foopm = File::Spec->catfile( $tempdir,
+ qw| DBICTest Schema Overwrite_modifications Result Foo.pm |);
dump_schema();
# check that we dumped
DBICTest::Schema::Overwrite_modifications->_loader_invoked(0)
if @DBICTest::Schema::Overwrite_modifications::ISA;
+ local $SIG{__WARN__} = sub {
+ warn @_
+ unless $_[0] =~ /^Dumping manual schema|^Schema dump completed/;
+ };
DBIx::Class::Schema::Loader::make_schema_at( 'DBICTest::Schema::Overwrite_modifications',
{ dump_directory => $tempdir,
@_,