t/deprecated_appclass_action_warnings.t

   1 use strict;
   2 use warnings;
   3
   4 use FindBin;
   5 use lib "$FindBin::Bin/lib";
   6
   7 use Test::More;
   8 use Catalyst::Test 'DeprecatedActionsInAppClassTestApp';
   9
  10 plan tests => 3;
  11
  12 my $warnings;
  13 my $logger = DeprecatedActionsInAppClassTestApp::Log->new;
  14 Catalyst->log($logger);
  15
  16 ok( my $response = request('http://localhost/foo'), 'Request' );
  17 ok( $response->is_success, 'Response Successful 2xx' );
  18 is( $DeprecatedActionsInAppClassTestApp::Log::warnings, 1, 'Get the appclass action warning' );