X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_component_controller_action_chained.t;h=523821d58dcc9e9f8a41e1c6c2d0c619764896a9;hb=6fc58422a1870e23a07943b9420a30a6aa90b252;hp=e9033919884e93f494990f9a429fe6e982d96e3a;hpb=f505df49a4707ce6962d8a9ebcf5280430a801cf;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/live_component_controller_action_chained.t b/t/live_component_controller_action_chained.t
index e903391..523821d 100644
--- a/t/live_component_controller_action_chained.t
+++ b/t/live_component_controller_action_chained.t
@@ -57,7 +57,7 @@ sub run_tests {
             'chained + local endpoint; missing last argument' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
-        is( $response->header('Status'), 500, 'Status OK' );
+        is( $response->code, 500, 'Status OK' );
     }
 
     #
@@ -235,7 +235,7 @@ sub run_tests {
             'multi-action (three args, should lead to error)' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
-        is( $response->header('Status'), 500, 'Status OK' );
+        is( $response->code, 500, 'Status OK' );
     }
 
     #
@@ -646,7 +646,7 @@ sub run_tests {
             "Loose end is not callable" );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
-        is( $response->header('Status'), 500, 'Status OK' );
+        is( $response->code, 500, 'Status OK' );
     }
 
     #
@@ -698,8 +698,8 @@ sub run_tests {
         ok( my $response = request(
             'http://localhost/action/chained/to_root' ),
             'uri_for with chained root action as arg' );
-        is( $response->content,
-            'URI:http://localhost/',
+        like( $response->content,
+            qr(URI:http://[^/]+/),
             'Correct URI generated' );
     }