X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Flive_engine_request_parameters.t;h=581fc0365b40d9759dc81e0b532abf4a7e084694;hp=d2a91f030f503ae971bfd9e08dd55b23649eed36;hb=88e5a8b0c4d28e46b8ba6b6b9567063e57af9063;hpb=c7e57864972917f9db617f3401aa5ba1a2715e9d diff --git a/t/aggregate/live_engine_request_parameters.t b/t/aggregate/live_engine_request_parameters.t index d2a91f0..581fc03 100644 --- a/t/aggregate/live_engine_request_parameters.t +++ b/t/aggregate/live_engine_request_parameters.t @@ -114,7 +114,7 @@ use HTTP::Request::Common; # raw query string support { my $creq; - + my $body_parameters = { a => 1, blank => '', @@ -132,7 +132,7 @@ use HTTP::Request::Common; 'Content' => $body_parameters, 'Content-Type' => 'application/x-www-form-urlencoded' ); - + ok( my $response = request($request), 'Request' ); ok( eval '$creq = ' . $response->content, 'Unserialize Catalyst::Request' ); is( $creq->uri->query, 'query+string', 'Catalyst::Request POST query_string' ); @@ -140,7 +140,7 @@ use HTTP::Request::Common; is_deeply( $creq->query_parameters, $query_parameters, 'Catalyst::Request query_parameters' ); is_deeply( $creq->body_parameters, $body_parameters, 'Catalyst::Request body_parameters' ); is_deeply( $creq->parameters, $parameters, 'Catalyst::Request parameters' ); - + ok( $response = request('http://localhost/dump/request/a/b?x=1&y=1&z=1'), 'Request' ); ok( eval '$creq = ' . $response->content, 'Unserialize Catalyst::Request' ); is( $creq->uri->query, 'x=1&y=1&z=1', 'Catalyst::Request GET query_string' );