aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Questionnaire.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-05-25 16:43:40 +0100
committerStruan Donald <struan@exo.org.uk>2011-05-25 16:43:40 +0100
commitd974cc0258d26a366262bce7b456d39b0c71a40b (patch)
tree03534cbf86dcf83a36df3839ff49e70cbf458b5b /perllib/FixMyStreet/App/Controller/Questionnaire.pm
parent6a679dbe9f0d7021f176ca23106a74bc2475539e (diff)
parentc5ace4f09cb6a31942a4be688f883ca141ca6649 (diff)
Merge branch 'migrate_to_catalyst' of ssh://git.mysociety.org/data/git/public/fixmystreet into migrate_to_catalyst
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Questionnaire.pm')
-rwxr-xr-xperllib/FixMyStreet/App/Controller/Questionnaire.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Questionnaire.pm b/perllib/FixMyStreet/App/Controller/Questionnaire.pm
index 7169bc9e7..f46b98510 100755
--- a/perllib/FixMyStreet/App/Controller/Questionnaire.pm
+++ b/perllib/FixMyStreet/App/Controller/Questionnaire.pm
@@ -260,7 +260,11 @@ sub display : Private {
$c,
latitude => $problem->latitude,
longitude => $problem->longitude,
- pins => [ [ $problem->latitude, $problem->longitude, $problem->state eq 'fixed' ? 'green' : 'red' ] ],
+ pins => [ {
+ latitude => $problem->latitude,
+ longitude => $problem->longitude,
+ colour => $problem->state eq 'fixed' ? 'green' : 'red',
+ } ],
);
$c->stash->{map_js} = FixMyStreet::Map::header_js();
$c->stash->{cobrand_form_elements} = $c->cobrand->form_elements('questionnaireForm');