From a38d76783ee9a44b9e237a87d086549677d3282e Mon Sep 17 00:00:00 2001 From: Edmund von der Burg Date: Tue, 12 Apr 2011 12:32:58 +0100 Subject: Redirect locations queries from '/' to '/around' --- t/app/controller/index.t | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 't/app/controller/index.t') diff --git a/t/app/controller/index.t b/t/app/controller/index.t index 1d0bff33c..91f01c943 100644 --- a/t/app/controller/index.t +++ b/t/app/controller/index.t @@ -15,8 +15,9 @@ subtest "check that the form goes to /around" => sub { $mech->submit_form_ok( { with_fields => { pc => 'SW1A 1AA', } } ); # check that we are at /around - is $mech->res->uri->path, '/around', "Got to /around"; - is $mech->res->uri->query_form, { pc => 'SW1A 1AA' }, "query passed along"; + is $mech->uri->path, '/around', "Got to /around"; + is_deeply { $mech->uri->query_form }, { pc => 'SW1A 1AA' }, + "query passed along"; }; subtest "check that requests with pc, x,y or lat,lon go to /around" => sub { @@ -31,8 +32,8 @@ subtest "check that requests with pc, x,y or lat,lon go to /around" => sub { $mech->get_ok($uri); # check that we are at /around - is $mech->res->uri->path, '/around', "Got to /around"; - is $mech->res->uri->query_form, $test, "query passed along"; + is $mech->uri->path, '/around', "Got to /around"; + is_deeply { $mech->uri->query_form }, $test, "query passed along"; } }; -- cgit v1.2.3