silence the useless warning spew in 20invocations.t
Brandon Black [Wed, 15 Nov 2006 13:59:31 +0000 (13:59 +0000)]
t/20invocations.t

index 22b0836..49d16af 100644 (file)
@@ -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) = @_;