7 use lib "$FindBin::Bin/lib";
11 BEGIN { $iters = $ENV{CAT_BENCH_ITERS} || 1; }
13 use Test::More tests => 3*$iters;
14 use Catalyst::Test 'TestAppDoubleAutoBug';
16 if ( $ENV{CAT_BENCHMARK} ) {
18 Benchmark::timethis( $iters, \&run_tests );
29 if ( $ENV{CATALYST_SERVER} ) {
30 skip 'Using remote server', 3;
35 TestAppDoubleAutoBug->auto
36 TestAppDoubleAutoBug->default
37 TestAppDoubleAutoBug->end
40 my $expected = join( ", ", @expected );
42 ok( my $response = request('http://localhost/action/auto/one'), 'auto + local' );
43 is( $response->header('X-Catalyst-Executed'),
44 $expected, 'Executed actions' );
45 is( $response->content, 'default, auto=1', 'Content OK' );