improved req/res/stats trait composing

[catagits/Catalyst-Runtime.git] / t / args0_bug.t

diff --git a/t/args0_bug.t b/t/args0_bug.t
index 4f6fd48..1d498e5 100644 (file)
--- a/t/args0_bug.t
+++ b/t/args0_bug.t
@@ -15,15 +15,18 @@ use Test::More;
 
     sub chained_one_args_0  : Chained(chain_base) PathPart('') Args(1) { $_[1]->res->body('chained_one_args_0') }
     sub chained_one_args_1  : Chained(chain_base) PathPart('') Args(1) { $_[1]->res->body('chained_one_args_1') }
+    sub chained_one_args_2  : Chained(chain_base) PathPart('') Args(1) { $_[1]->res->body('chained_one_args_2') }
 
     sub chained_zero_args_0 : Chained(chain_base) PathPart('') Args(0) { $_[1]->res->body('chained_zero_args_0') }
     sub chained_zero_args_1 : Chained(chain_base) PathPart('') Args(0) { $_[1]->res->body('chained_zero_args_1') }
+    sub chained_zero_args_2 : Chained(chain_base) PathPart('') Args(0) { $_[1]->res->body('chained_zero_args_2') }
 
   MyApp::Controller::Root->config(namespace=>'');
 
   package MyApp;
   use Catalyst;
 
+  #MyApp->config(use_chained_args_0_special_case=>1);
   MyApp->setup;
 }
 
@@ -48,12 +51,12 @@ use Test::More;
 use Catalyst::Test 'MyApp';
 {
    my $res = request '/chain_base/capturearg/arg';
-  is $res->content, 'chained_one_args_1', "request '/chain_base/capturearg/arg'";
+  is $res->content, 'chained_one_args_2', "request '/chain_base/capturearg/arg'";
 }
 
 {
     my $res = request '/chain_base/capturearg';
-    is $res->content, 'chained_zero_args_1', "request '/chain_base/capturearg'";
+    is $res->content, 'chained_zero_args_2', "request '/chain_base/capturearg'";
 }
 
 done_testing;