minor changes
[catagits/Catalyst-Runtime.git] / t / aggregate / live_component_controller_action_index_or_default.t
CommitLineData
2ee0056e 1#!perl
2
3use strict;
4use warnings;
5
6use FindBin;
7use lib "$FindBin::Bin/../lib";
8
9our $iters;
10
11BEGIN { $iters = $ENV{CAT_BENCH_ITERS} || 1; }
12
05b47f2e 13use Test::More tests => 3*$iters;
2ee0056e 14
05b47f2e 15use Catalyst::Test 'TestAppIndexDefault';
2ee0056e 16
17if ( $ENV{CAT_BENCHMARK} ) {
18 require Benchmark;
19 Benchmark::timethis( $iters, \&run_tests );
20}
21else {
22 for ( 1 .. $iters ) {
23 run_tests();
24 }
25}
26
27sub run_tests {
28 is(get('/indexchained'), 'index_chained', ':Chained overrides index');
05b47f2e 29 is(get('/indexprivate'), 'index_private', 'index : Private still works');
91955398 30 is(get('/one_arg'), 'path_one_arg', ':Path overrides default');
2ee0056e 31}