X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fbackcompat%2F0.04006%2Flib%2Fdbixcsl_common_tests.pm;h=a67eb6131e3c978aab74323d1d1d2f6d149c850b;hb=c59a00962505d565186aa386e6b4c5aaf3a96360;hp=7e046fcbce2b37f0410550b537e58f5428742cf3;hpb=b1d11550f638228695e0ce1120352bfae3c00be5;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm b/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm index 7e046fc..a67eb61 100644 --- a/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm +++ b/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm @@ -553,7 +553,10 @@ sub run_tests { $dbh->disconnect; } - my @new = $conn->rescan; + my @new = do { + local $SIG{__WARN__} = sub {}; + $conn->rescan; + }; is(scalar(@new), 1); is($new[0], 'LoaderTest30');