diff options
author | Struan Donald <struan@exo.org.uk> | 2012-02-27 13:07:09 +0000 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2012-02-27 13:07:09 +0000 |
commit | 5c81b97ba891837b45fe1ec7b43566543918eeef (patch) | |
tree | bfd5fd46593c7e5fe046a1b30f1ff6f12e46f03b /perllib/FixMyStreet/SendReport/Email.pm | |
parent | 2274cabb4308ad5bf4ba2a50f97d4a1e810292fb (diff) |
reduce duplicated code
Diffstat (limited to 'perllib/FixMyStreet/SendReport/Email.pm')
-rw-r--r-- | perllib/FixMyStreet/SendReport/Email.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/SendReport/Email.pm b/perllib/FixMyStreet/SendReport/Email.pm index 94cd94767..ab9d7edcc 100644 --- a/perllib/FixMyStreet/SendReport/Email.pm +++ b/perllib/FixMyStreet/SendReport/Email.pm @@ -2,7 +2,6 @@ package FixMyStreet::SendReport::Email; use Moose; use namespace::autoclean; -use Data::Printer; BEGIN { extends 'FixMyStreet::SendReport'; } @@ -64,7 +63,7 @@ sub build_recipient_list { sub send { my $self = shift; - my ( $row, $h, $to, $template, $recips, $nomail ) = @_; + my ( $row, $h, $to, $template, $recips, $nomail, $areas_info ) = @_; my @recips; @@ -72,7 +71,7 @@ sub send { if (mySociety::Config::get('STAGING_SITE')) { @recips = ( mySociety::Config::get('CONTACT_EMAIL') ); } else { - @recips = $self->build_recipient_list( $row ); + @recips = $self->build_recipient_list( $row, $areas_info ); } return unless @recips; |