diff options
author | Struan Donald <struan@exo.org.uk> | 2012-02-27 15:21:41 +0000 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2012-02-27 15:21:41 +0000 |
commit | 21b82d30b9348c3de50f711d8b7c80bcdaf2c756 (patch) | |
tree | 51d2551231255e558dc6d630cb576d7716be7a62 /perllib/FixMyStreet/SendReport/Email.pm | |
parent | 6b5a40f54eb4ef87724ecbd53513cf707b00d106 (diff) |
put something in the base class and make things inherit from it
Diffstat (limited to 'perllib/FixMyStreet/SendReport/Email.pm')
-rw-r--r-- | perllib/FixMyStreet/SendReport/Email.pm | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/perllib/FixMyStreet/SendReport/Email.pm b/perllib/FixMyStreet/SendReport/Email.pm index ab9d7edcc..c231a6b61 100644 --- a/perllib/FixMyStreet/SendReport/Email.pm +++ b/perllib/FixMyStreet/SendReport/Email.pm @@ -5,27 +5,6 @@ use namespace::autoclean; BEGIN { extends 'FixMyStreet::SendReport'; } -has 'councils' => (is => 'rw', isa => 'HashRef', default => sub { {} } ); -has 'to' => (is => 'rw', isa => 'ArrayRef', default => sub { [] } ); - -my %councils = (); -my @to; - -sub reset { - my $self = shift; - - $self->councils( {} ); - $self->to( [] ); -} - -sub add_council { - my $self = shift; - my $council = shift; - my $name = shift; - - $self->councils->{ $council } = $name; -} - sub build_recipient_list { my $self = shift; my $row = shift; |