X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Fdeprecated_test_import.t;fp=t%2Faggregate%2Fdeprecated_test_import.t;h=ee90eeab5d43e9c116f26373fbb4aa4d6f8e69b4;hb=955d6da66d0a5c2f770d68d9b9e5b1bd22b21750;hp=0000000000000000000000000000000000000000;hpb=c9ec25f80489f039512982f9e02527d537412f6e;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/deprecated_test_import.t b/t/aggregate/deprecated_test_import.t new file mode 100644 index 0000000..ee90eea --- /dev/null +++ b/t/aggregate/deprecated_test_import.t @@ -0,0 +1,16 @@ +use strict; +use warnings; + +use Test::More; +use Catalyst::Test (); + +my $warn; +{ + local $SIG{__WARN__} = sub { $warn = shift; }; + Catalyst::Test->import(); +} +ok $warn; +like $warn, qr/deprecated/; + +done_testing; +