Add colours to map markers

1 files changed, 7 insertions, 0 deletions

diff --git a/perllib/FixMyStreet/Cobrand/FiksGataMi.pm b/perllib/FixMyStreet/Cobrand/FiksGataMi.pm
index 7b175f371..4d1fbaaa5 100644
--- a/perllib/FixMyStreet/Cobrand/FiksGataMi.pm
+++ b/perllib/FixMyStreet/Cobrand/FiksGataMi.pm
@@ -28,6 +28,13 @@ sub disambiguate_location {
     };
 }
 
+sub pin_colour {
+    my ( $self, $p, $context ) = @_; 
+    return 'green' if $p->is_fixed || $p->is_closed;
+    return 'red' if $p->state eq 'unconfirmed' || $p->state eq 'confirmed';
+    return 'yellow';
+}
+
 sub area_types {
     [ 'NKO', 'NFY', 'NRA' ];
 }