merged conflicts
[catagits/Catalyst-Runtime.git] / t / aggregate / custom_live_path_bug.t
CommitLineData
2f381252 1use strict;
2use warnings;
3
4use FindBin;
b1ead5a2 5use lib "$FindBin::Bin/../lib";
2f381252 6
7our $iters;
8
9BEGIN { $iters = $ENV{CAT_BENCH_ITERS} || 1; }
10
11use Test::More tests => 2*$iters;
12use Catalyst::Test 'TestAppPathBug';
13
14if ( $ENV{CAT_BENCHMARK} ) {
15 require Benchmark;
16 Benchmark::timethis( $iters, \&run_tests );
17}
18else {
19 for ( 1 .. $iters ) {
20 run_tests();
21 }
22}
737a1e42 23
2f381252 24sub run_tests {
25 SKIP:
26 {
27 if ( $ENV{CATALYST_SERVER} ) {
28 skip 'Using remote server', 2;
29 }
737a1e42 30
2f381252 31 {
32 my $expected = 'This is the foo method.';
33 ok( my $response = request('http://localhost/'), 'response ok' );
34 is( $response->content, $expected, 'Content OK' );
35 }
36 }
37}