aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Questionnaire.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-05-24 13:16:48 +0100
committerStruan Donald <struan@exo.org.uk>2011-05-24 13:16:48 +0100
commitf75abf8da76dd83fb0fae0a2807cd6777305b9f6 (patch)
tree80eb0aed8f3c20fda03f3c0168b7ad6531e24267 /perllib/FixMyStreet/App/Controller/Questionnaire.pm
parent39de750282cb6e5248320ac4408c4b57afe33597 (diff)
parent388a9b16d9dfa25b4854c8a3685dc3c764c391a5 (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.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Questionnaire.pm b/perllib/FixMyStreet/App/Controller/Questionnaire.pm
index 986543e9d..c5258e7d0 100755
--- a/perllib/FixMyStreet/App/Controller/Questionnaire.pm
+++ b/perllib/FixMyStreet/App/Controller/Questionnaire.pm
@@ -198,6 +198,10 @@ sub display : Private {
my $problem = $c->stash->{questionnaire}->problem;
+ ( $c->stash->{short_latitude}, $c->stash->{short_longitude} ) =
+ map { Utils::truncate_coordinate($_) }
+ ( $problem->latitude, $problem->longitude );
+
my $problem_text = ''; # Page::display_problem_text($c->fake_q, $problem); # FIXME This needs to be in the template
$c->stash->{updates} = ''; # FIXME Should be database ResultSet of problem's pdates
$c->stash->{map_start_html} = FixMyStreet::Map::display_map(