aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Questionnaire.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2011-05-25 16:11:07 +0100
committerMatthew Somerville <matthew@mysociety.org>2011-05-25 16:11:07 +0100
commitc5ace4f09cb6a31942a4be688f883ca141ca6649 (patch)
tree0c534b1580b8863614d4ff9b6b720fe7835ff268 /perllib/FixMyStreet/App/Controller/Questionnaire.pm
parentfe35ddba0fab0ebc413300dff0f1f323aec40e9a (diff)
Get rid of pointless and hard-to-follow listrefs when referring to pins.
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 96650a1c6..289ba6bb3 100755
--- a/perllib/FixMyStreet/App/Controller/Questionnaire.pm
+++ b/perllib/FixMyStreet/App/Controller/Questionnaire.pm
@@ -212,7 +212,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');