From: Florian Ragwitz Date: Sun, 27 Mar 2011 10:40:00 +0000 (+0100) Subject: Add tests for the deprecated local_request X-Git-Tag: 5.89003~79 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=75e2d0c5095c061188fe06d13962906f7a064622 Add tests for the deprecated local_request --- diff --git a/t/aggregate/deprecated_test_unimported.t b/t/aggregate/deprecated_test_unimported.t new file mode 100644 index 0000000..3548ae2 --- /dev/null +++ b/t/aggregate/deprecated_test_unimported.t @@ -0,0 +1,18 @@ +use strict; +use warnings; +use Test::More; +use FindBin; +use lib "$FindBin::Bin/../lib"; +use TestApp; +use Catalyst::Test (); + +{ + like do { + my $warning; + local $SIG{__WARN__} = sub { $warning = $_[0] }; + isa_ok Catalyst::Test::local_request('TestApp', '/'), 'HTTP::Response'; + $warning; + }, qr/deprecated/, 'local_request is deprecated'; +} + +done_testing;