From: Rafael Kitover Date: Fri, 1 Jan 2010 10:55:01 +0000 (+0000) Subject: silence warnings from 40overwrite_modifications.t X-Git-Tag: 0.04999_13~9 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class-Schema-Loader.git;a=commitdiff_plain;h=cb68a7ccf88f9c50cd6c133ba15329167579e267 silence warnings from 40overwrite_modifications.t --- diff --git a/t/40overwrite_modifications.t b/t/40overwrite_modifications.t index 5863974..fa079f5 100644 --- a/t/40overwrite_modifications.t +++ b/t/40overwrite_modifications.t @@ -46,6 +46,10 @@ sub dump_schema { 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, @_,