X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F990_deprecated%2F001-export_to_level.t;h=000ab6c0f64650f9011bf51dc261854b76c19f97;hb=HEAD;hp=e14ab1080193f29d59d6f724a7629de998676f86;hpb=4e24a2c7c1a939c30462a9a301147fe59dca9cd6;p=gitmo%2FMouse.git

diff --git a/t/990_deprecated/001-export_to_level.t b/t/990_deprecated/001-export_to_level.t
index e14ab10..000ab6c 100644
--- a/t/990_deprecated/001-export_to_level.t
+++ b/t/990_deprecated/001-export_to_level.t
@@ -4,6 +4,8 @@ use warnings;
 use Test::More tests => 3;
 
 BEGIN{
+    $SIG{__WARN__} = sub { $_[0] =~ /deprecated/ or warn @_ };
+
     package Foo;
     use Mouse;