Create Around controller and implement the easy bits

1 files changed, 31 insertions, 0 deletions

diff --git a/t/app/controller/around.t b/t/app/controller/around.t
new file mode 100644
index 000000000..021cf8f7d
--- /dev/null
+++ b/t/app/controller/around.t
@@ -0,0 +1,31 @@
+use strict;
+use warnings;
+use Test::More;
+
+use FixMyStreet::TestMech;
+my $mech = FixMyStreet::TestMech->new;
+
+subtest "check that if no query we get sent back to the homepage" => sub {
+    $mech->get_ok('/around');
+    is $mech->uri->path, '/', "sent back to '/'";
+};
+
+# x,y requests were generated by the old map code. We keep the behavior for
+# historic links
+subtest "redirect x,y requests to lat/lon (301 - permanent)" => sub {
+
+    $mech->get_ok('/around?x=3281&y=1113');
+
+    # did we redirect to lat,lon?
+    is $mech->uri->path, '/around', "still on /around";
+    is_deeply { $mech->uri->query_form },
+      { lat => 51.4998246332569, lon => -0.140137309739907, },
+      "lat,lon correctly set";
+
+    # was it a 301?
+    is $mech->res->code, 200, "got 200 for final destination";
+    is $mech->res->previous->code, 301, "got 301 for redirect";
+
+};
+
+done_testing();