X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fquery_keywords_and_parameters.t;h=27e598bbe7dc2d9a13400aa1be501c7662c0599f;hp=ba8938bb1f76aa52e9385b4046087b1f668bdf90;hb=93534e4d63fd2b3600acede08843e297f4398085;hpb=4910fc25573e604a633a97d47c992f7d0c51b02d diff --git a/t/query_keywords_and_parameters.t b/t/query_keywords_and_parameters.t index ba8938b..27e598b 100644 --- a/t/query_keywords_and_parameters.t +++ b/t/query_keywords_and_parameters.t @@ -28,8 +28,7 @@ use Catalyst::Test 'MyApp'; # https://www.w3.org/TR/html5/forms.html#url-encoded-form-data { - ok my $req = GET 'root/bar', - 'Content-Type' => 'application/x-www-form-urlencoded'; + ok my $req = GET 'root/bar'; my ($res, $c) = ctx_request($req); @@ -39,19 +38,17 @@ use Catalyst::Test 'MyApp'; { - ok my $req = GET 'root/bar?', - 'Content-Type' => 'application/x-www-form-urlencoded'; + ok my $req = GET 'root/bar?'; my ($res, $c) = ctx_request($req); - is $c->req->query_keywords, '', 'query_keywords is not defined with empty query string'; + ok !defined $c->req->query_keywords, 'query_keywords is not defined when ? with empty query string'; is_deeply $c->req->query_parameters, {}, 'query_parameters defined, but empty with empty query string'; } { - ok my $req = GET 'root/bar?a=b', - 'Content-Type' => 'application/x-www-form-urlencoded'; + ok my $req = GET 'root/bar?a=b'; my ($res, $c) = ctx_request($req); @@ -61,8 +58,7 @@ use Catalyst::Test 'MyApp'; { - ok my $req = GET 'root/bar?x', - 'Content-Type' => 'application/x-www-form-urlencoded'; + ok my $req = GET 'root/bar?x'; my ($res, $c) = ctx_request($req); @@ -75,8 +71,7 @@ use Catalyst::Test 'MyApp'; { - ok my $req = GET 'root/bar?x&a=b', - 'Content-Type' => 'application/x-www-form-urlencoded'; + ok my $req = GET 'root/bar?x&a=b'; my ($res, $c) = ctx_request($req);