diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2019-10-15 11:41:14 +0100 |
|---|---|---|
| committer | Dave Arter <davea@mysociety.org> | 2019-10-21 14:23:53 +0100 |
| commit | f974c4952c9228a0ef60e7fb68704f4ef5c7cbb9 (patch) | |
| tree | e20e6e817ba8fa64a838e6d74179990dc2de7dc6 /perllib | |
| parent | 86866375d761b2b2e6725c8d5ae948cc4b772dde (diff) | |
[fixmystreet.com] Generalise emergency message script.
Diffstat (limited to 'perllib')
| -rw-r--r-- | perllib/FixMyStreet/Roles/Extra.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Roles/Extra.pm b/perllib/FixMyStreet/Roles/Extra.pm index 883ac2fd7..5132c3e58 100644 --- a/perllib/FixMyStreet/Roles/Extra.pm +++ b/perllib/FixMyStreet/Roles/Extra.pm @@ -141,6 +141,7 @@ sub push_extra_fields { Given an extra field, will replace one with the same code in the existing list of fields, or add to the end if not present. +Returns true if it was already present, false if newly added. =cut @@ -167,6 +168,7 @@ sub update_extra_field { } $self->set_extra_fields(@$existing); + return $found; } =head2 remove_extra_field |