aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perllib/Open311.pm1
-rw-r--r--t/open311.t2
2 files changed, 2 insertions, 1 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 );
diff --git a/t/open311.t b/t/open311.t
index 77eefba0e..e84b5f04b 100644
--- a/t/open311.t
+++ b/t/open311.t
@@ -122,7 +122,7 @@ for my $test (
params => [
[ 'first_name', 'First', 'first name correct' ],
[ 'last_name', 'Last', 'last name correct' ],
- [ 'attribute[first_name]', 'First', 'first_name attribute param correct' ],
+ [ 'attribute[first_name]', undef, 'no first_name attribute param' ],
[ 'attribute[last_name]', 'Last', 'last_name attribute param correct' ],
],
},