Added chain_point to create a non-REST chain point - added tests

[catagits/CatalystX-Routes.git] / t / routes.t

diff --git a/t/routes.t b/t/routes.t
index a38a77a..25591bc 100644 (file)
--- a/t/routes.t
+++ b/t/routes.t
@@ -82,6 +82,25 @@ use HTTP::Request::Common qw( GET PUT POST DELETE );
 }
 
 {
+    get('/chain1/42/chain2/84/baz/foo');
+
+    is(
+        $MyApp1::Controller::C1::REQ{chain1}, 42,
+        'chain1 chain point captured the first arg'
+    );
+
+    is(
+        $MyApp1::Controller::C1::REQ{chain2}, 84,
+        'chain2 chain point captured the second arg'
+    );
+
+    is(
+        $MyApp1::Controller::C1::REQ{baz}, 'foo',
+        'baz route captured the third arg'
+    );
+}
+
+{
     get('/normal');
 
     is(