X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F20invocations.t;h=f239acf4c77a67948a26983e42e838b4feb9b463;hb=b7b9d2402c146cc59a7ce4b80f5c41e78924e354;hp=fdab7918a67f394cae7394bee061d16be4c114de;hpb=fd9266d486de6ef767779ddcf94f46eff3e75612;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

diff --git a/t/20invocations.t b/t/20invocations.t
index fdab791..f239acf 100644
--- a/t/20invocations.t
+++ b/t/20invocations.t
@@ -3,6 +3,8 @@ use Test::More;
 use lib qw(t/lib);
 use make_dbictest_db;
 
+$SIG{__WARN__} = sub { }; # Suppress warnings, as we test a lot of deprecated stuff here
+
 # Takes a $schema as input, runs 4 basic tests
 sub test_schema {
     my ($testname, $schema) = @_;