X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fdeprecated_appclass_action_warnings.t;h=f25d8d5127757bc18e90faa2d041e6c04e4a8abd;hp=6d73d6e61729abb390e7b149c1d31a74a9d2c3e9;hb=161710a39409d2afd256463471b8014a1c69adf4;hpb=fe3e42c35853baa14fe879401ea85bf4c49e8153 diff --git a/t/deprecated_appclass_action_warnings.t b/t/deprecated_appclass_action_warnings.t index 6d73d6e..f25d8d5 100644 --- a/t/deprecated_appclass_action_warnings.t +++ b/t/deprecated_appclass_action_warnings.t @@ -7,7 +7,12 @@ use lib "$FindBin::Bin/lib"; use Test::More; use Catalyst::Test 'DeprecatedActionsInAppClassTestApp'; -plan tests => 2; +plan tests => 3; + +my $warnings; +my $logger = DeprecatedActionsInAppClassTestApp::Log->new; +Catalyst->log($logger); ok( my $response = request('http://localhost/foo'), 'Request' ); ok( $response->is_success, 'Response Successful 2xx' ); +is( $DeprecatedActionsInAppClassTestApp::Log::warnings, 1, 'Get the appclass action warning' ); \ No newline at end of file