5 use lib "$FindBin::Bin/../lib";
9 BEGIN { $iters = $ENV{CAT_BENCH_ITERS} || 1; }
11 use Test::More tests => 3*$iters;
12 use Catalyst::Test 'TestAppDoubleAutoBug';
14 if ( $ENV{CAT_BENCHMARK} ) {
16 Benchmark::timethis( $iters, \&run_tests );
27 if ( $ENV{CATALYST_SERVER} ) {
28 skip 'Using remote server', 3;
33 TestAppDoubleAutoBug::Controller::Root->auto
34 TestAppDoubleAutoBug::Controller::Root->default
35 TestAppDoubleAutoBug::Controller::Root->end
38 my $expected = join( ", ", @expected );
40 ok( my $response = request('http://localhost/action/auto/one'), 'auto + local' );
41 is( $response->header('X-Catalyst-Executed'),
42 $expected, 'Executed actions' );
43 is( $response->content, 'default, auto=1', 'Content OK' );