diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2012-12-20 13:21:50 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2012-12-20 13:21:50 +0000 |
| commit | 762f7693882bf1337db130b25225300889d29f16 (patch) | |
| tree | 2517137aaafa6f0c296d6792d690aa044dc19524 | |
| parent | 6eecce40b7f36e37c507bc08e78180a11264abd9 (diff) | |
Set title to start of detail upon report creation.
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Report/New.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Report/New.pm b/perllib/FixMyStreet/App/Controller/Report/New.pm index 70bccd910..496dbe9ac 100644 --- a/perllib/FixMyStreet/App/Controller/Report/New.pm +++ b/perllib/FixMyStreet/App/Controller/Report/New.pm @@ -938,6 +938,8 @@ sub check_for_errors : Private { if ( $c->cobrand->moniker eq 'zurich' ) { delete $field_errors{title}; delete $field_errors{name}; + my $report = $c->stash->{report}; + $report->title( Utils::cleanup_text( substr($report->detail, 0, 25) ) ); } # FIXME: need to check for required bromley fields here |