From: Rafael Kitover <rkitover@cpan.org>
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?a=commitdiff_plain;h=cb68a7ccf88f9c50cd6c133ba15329167579e267;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

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,
 						   @_,