X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Flive_component_controller_args.t;h=5f4364f29445e7b2b35083c39d92f9df8832def8;hb=7991d6fc21b6827110266ea18a2e302a609190e2;hp=29d26a1802c949b1ad83f80b2bd34d67c59510dc;hpb=ae29b412955743885e80350085167b54b69672da;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/aggregate/live_component_controller_args.t b/t/aggregate/live_component_controller_args.t
index 29d26a1..5f4364f 100644
--- a/t/aggregate/live_component_controller_args.t
+++ b/t/aggregate/live_component_controller_args.t
@@ -1,5 +1,3 @@
-#!perl
-
 use strict;
 use warnings;
 
@@ -62,9 +60,9 @@ sub run_test_for {
     } else {
         $path = uri_escape($test);
     }
-    
+
     SKIP:
-    {   
+    {
         # Skip %2F, ., [, (, and ) tests on real webservers
         # Both Apache and lighttpd don't seem to like these
         if ( $ENV{CATALYST_SERVER} && $path =~ /(?:%2F|\.|%5B|\(|\))/ ) {
@@ -73,21 +71,21 @@ sub run_test_for {
 
         my $response;
 
-        ok( $response = request("http://localhost/args/args/$path"), "Requested args for path $path");
+        ok( $response = request("http://localhost/args/args/$path"), "Requested /args/args/$path");
 
         is( $response->content, $test, "$test as args" );
 
         undef $response;
 
-        ok( $response = request("http://localhost/args/params/$path"), "Requested params for path $path");
+        ok( $response = request("http://localhost/args/params/$path"), "Requested /args/params/$path");
 
-        is( $response->content, $test, "$test as params" );
+        is( $response->content, $test, "response content $test as params" );
 
         undef $response;
 
         if( $test =~ m{/} ) {
             $test =~ s{/}{}g;
-            $path = uri_escape( $test ); 
+            $path = uri_escape( $test );
         }
 
         ok( $response = request("http://localhost/chained/multi_cap/$path/baz"), "Requested capture for path $path");