X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Flive_component_controller_args.t;h=7b99b24c794c74ec420d6869183d3c0a7f60c7f5;hb=4c71cf1b43594eabfee6e346a0a30b6dcf315b4f;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..7b99b24 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; @@ -73,15 +71,15 @@ 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;