diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2019-09-03 16:33:35 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2019-09-03 16:36:43 +0100 |
| commit | 4b7da24b5d2605d25c45bbeef1328f8118334b31 (patch) | |
| tree | 9fd174166779b88627d9cd833aaa0fcaec6df5bd /perllib/FixMyStreet | |
| parent | 49c74ded4275005e766a948ec47d4cc722e0567e (diff) | |
Allow more characters in name splitting.
Not sure how this has not arisen before!
Diffstat (limited to 'perllib/FixMyStreet')
| -rw-r--r-- | perllib/FixMyStreet/Cobrand/Bromley.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Bromley.pm b/perllib/FixMyStreet/Cobrand/Bromley.pm index ce7c0971f..391106346 100644 --- a/perllib/FixMyStreet/Cobrand/Bromley.pm +++ b/perllib/FixMyStreet/Cobrand/Bromley.pm @@ -194,7 +194,7 @@ sub open311_config { # make sure we have last_name attribute present in row's extra, so # it is passed correctly to Bromley as attribute[] if ( $row->cobrand ne 'bromley' ) { - my ( $firstname, $lastname ) = ( $row->name =~ /(\w+)\.?\s+(.+)/ ); + my ( $firstname, $lastname ) = ( $row->name =~ /(\S+)\.?\s+(.+)/ ); push @$extra, { name => 'last_name', value => $lastname }; } |