Starting tests for /reports, fix for warning.

1 files changed, 34 insertions, 0 deletions

diff --git a/t/app/controller/reports.t b/t/app/controller/reports.t
new file mode 100644
index 000000000..312297436
--- /dev/null
+++ b/t/app/controller/reports.t
@@ -0,0 +1,34 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::WWW::Mechanize::Catalyst 'FixMyStreet::App';
+use mySociety::MaPit;
+
+ok( my $mech = Test::WWW::Mechanize::Catalyst->new, 'Created mech object' );
+
+# check that we can get the page
+$mech->get_ok('/reports');
+$mech->title_like(qr{Summary reports});
+$mech->content_contains('Birmingham');
+$mech->follow_link_ok( { text_regex => qr/Birmingham/ } );
+
+SKIP: {
+    skip( "Need 'emptyhomes' in ALLOWED_COBRANDS config", 8 )
+      unless FixMyStreet::App->config->{ALLOWED_COBRANDS} =~ m{emptyhomes};
+    ok $mech->host("reportemptyhomes.com"), 'change host to reportemptyhomes';
+    $mech->get_ok('/reports');
+    # EHA lacks one column the others have
+    $mech->content_lacks('state unknown');
+
+    # FIXME To do the below, need a way of altering where MaPit is pointing
+    # skip( "Need 'fiksgatami' in ALLOWED_COBRANDS config", 8 )
+    #   unless FixMyStreet::App->config->{ALLOWED_COBRANDS} =~ m{fiksgatami};
+    # ok $mech->host("fiksgatami.no"), 'change host to fiksgatami';
+    # $mech->get_ok('/reports');
+    # # There should only be one Oslo
+    # $mech->content_contains('Oslo');
+    # $mech->content_unlike(qr{Oslo.*Oslo}s);
+}
+
+done_testing();
+