diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2012-07-23 12:01:36 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2012-07-23 12:01:36 +0100 |
| commit | 95d4d488e8e409e9646ab24731a50ee2846d68c3 (patch) | |
| tree | 1872661f8a2663c6fb624a5e7e5e4a3d929a95bd | |
| parent | 5fa680e52ffe8cfe7aa7b06fd96b8bce61095418 (diff) | |
Store body sent to on external_body.
| -rw-r--r-- | perllib/FixMyStreet/SendReport/NI.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/SendReport/NI.pm b/perllib/FixMyStreet/SendReport/NI.pm index 8cddeb2dc..0783a385b 100644 --- a/perllib/FixMyStreet/SendReport/NI.pm +++ b/perllib/FixMyStreet/SendReport/NI.pm @@ -27,6 +27,7 @@ sub build_recipient_list { if ( $email =~ /^roads.([^@]*)\@drdni/ ) { $name = "Roads Service (\u$1)"; $h->{councils_name} = $name; + $row->external_body( 'Roads Service' ); } push @{ $self->to }, [ $email, $name ]; $recips{$email} = 1; |