diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-09-13 15:06:37 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-09-13 15:06:37 +0100 |
| commit | f08dc6c4412fba41c2628654eec2850c5fafb6af (patch) | |
| tree | 6c2a0fc092c2fc03cb21f62005c93b749910bdde | |
| parent | 22dea6ce8488ccec874d7509fbbe1936376857cf (diff) | |
Allow contact form to include extra fields.
| -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; } |