aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Open311.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2012-04-24 17:26:17 +0100
committerStruan Donald <struan@exo.org.uk>2012-04-24 17:26:17 +0100
commit0d3521c5af8a0bbe54e9f6ac06837246c28af054 (patch)
treee5703eece9c1065e7b8bd4c2348f1653212aaa91 /perllib/Open311.pm
parenta319b137504c9022ea6b68e342ac88c4a5b7e2b9 (diff)
first_name not required as an attribute parameter
Diffstat (limited to 'perllib/Open311.pm')
-rw-r--r--perllib/Open311.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/Open311.pm b/perllib/Open311.pm
index 4440d386e..48143ebd4 100644
--- a/perllib/Open311.pm
+++ b/perllib/Open311.pm
@@ -104,6 +104,7 @@ sub _populate_service_request_params {
my $attr_name = $attr->{name};
if ( $attr_name eq 'first_name' || $attr_name eq 'last_name' ) {
$params->{$attr_name} = $attr->{value} if $attr->{value};
+ next if $attr_name eq 'first_name';
}
$attr_name =~ s/fms_extra_//;
my $name = sprintf( 'attribute[%s]', $attr_name );