diff options
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Contact.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Contact.pm b/perllib/FixMyStreet/App/Controller/Contact.pm index 5527256a6..c2cc54832 100644 --- a/perllib/FixMyStreet/App/Controller/Contact.pm +++ b/perllib/FixMyStreet/App/Controller/Contact.pm @@ -191,6 +191,13 @@ sub prepare_params_for_email : Private { $c->stash->{problem}->update; } + my @extra = grep { /^extra\./ } keys %{$c->req->params}; + foreach (@extra) { + my $param = $c->get_param($_); + my ($field_name) = /extra\.(.*)/; + $c->stash->{message} = "\u$field_name: $param\n\n" . $c->stash->{message}; + } + return 1; } |