diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2017-12-13 13:35:12 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2017-12-13 13:35:12 +0000 |
| commit | 5a6d30ba74e70412593398b43e4c5e5c938c1d4c (patch) | |
| tree | 0b48ac48f1914a4091b6312fc175ce0849012c37 /perllib/FixMyStreet/DB/Result/Problem.pm | |
| parent | c6dd57095435257b1a37e424c4170d37a1c82a37 (diff) | |
| parent | f982c8f38d192c7d4c3304ab5617df01be4176a6 (diff) | |
Merge branch 'issues/forcouncils/261-rdi-check'
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/Problem.pm')
| -rw-r--r-- | perllib/FixMyStreet/DB/Result/Problem.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm index 3866532e9..8625bf17a 100644 --- a/perllib/FixMyStreet/DB/Result/Problem.pm +++ b/perllib/FixMyStreet/DB/Result/Problem.pm @@ -867,6 +867,17 @@ sub update_send_failed { } ); } +sub add_send_method { + my $self = shift; + my $sender = shift; + ($sender = ref $sender) =~ s/^.*:://; + if (my $send_method = $self->send_method_used) { + $self->send_method_used("$send_method,$sender"); + } else { + $self->send_method_used($sender); + } +} + sub as_hashref { my $self = shift; my $c = shift; |