diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-05-21 15:53:48 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-05-23 18:55:11 +0100 |
| commit | 9eb0b8ba50ab3835023477f7a44fa9cd4d8c787c (patch) | |
| tree | d9cd536e09c4239d0606f039cbe1cd57241f7148 /perllib/Open311.pm | |
| parent | 87f82f0caa7a7d25d09a8861582d087395578007 (diff) | |
[Open311] Cope with undefined names.
Diffstat (limited to 'perllib/Open311.pm')
| -rw-r--r-- | perllib/Open311.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perllib/Open311.pm b/perllib/Open311.pm index dc40076db..a91de0a7c 100644 --- a/perllib/Open311.pm +++ b/perllib/Open311.pm @@ -132,7 +132,7 @@ sub _populate_service_request_params { description => $description, service_code => $service_code, first_name => $firstname, - last_name => $lastname || '', + last_name => $lastname, }; $params->{phone} = $problem->user->phone if $problem->user->phone; @@ -413,9 +413,11 @@ sub _populate_service_request_update_params { sub split_name { my ( $self, $name ) = @_; + return ('', '') unless $name; + my ( $first, $last ) = ( $name =~ /(\w+)(?:\.?\s+(.+))?/ ); - return ( $first, $last ); + return ( $first || '', $last || ''); } sub _params_to_string { |