[EastSussex] pin colours

 - yellow for open issues, green otherwise
 - pins > 3 months hidden from /around/
 - reduced number of pins on /reports/ to 20 (as per Bromley/Hart)

1 files changed, 17 insertions, 0 deletions

diff --git a/perllib/FixMyStreet/Cobrand/EastSussex.pm b/perllib/FixMyStreet/Cobrand/EastSussex.pm
index c039b8410..6099d74de 100644
--- a/perllib/FixMyStreet/Cobrand/EastSussex.pm
+++ b/perllib/FixMyStreet/Cobrand/EastSussex.pm
@@ -110,5 +110,22 @@ sub get_geocoder {
     return 'OSM'; # default of Bing gives poor results, let's try overriding.
 }
 
+# for the /around/ page
+sub on_map_default_max_pin_age {
+    return '3 months';
+}
+
+# for the /reports/ page
+sub reports_per_page { return 20; }
+
+sub pin_colour {
+    my ( $self, $p, $context ) = @_;
+
+    # TODO refactor to a Moo(se)? lazy attribute
+    my $open_states = $self->{open_states} ||= $p->open_states;
+
+    return $open_states->{ $p->state } ? 'yellow' : 'green';
+}
+
 1;