aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/SendReport/Barnet.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perllib/FixMyStreet/SendReport/Barnet.pm')
-rw-r--r--perllib/FixMyStreet/SendReport/Barnet.pm21
1 files changed, 0 insertions, 21 deletions
diff --git a/perllib/FixMyStreet/SendReport/Barnet.pm b/perllib/FixMyStreet/SendReport/Barnet.pm
index 05ca20809..68bc8d6dc 100644
--- a/perllib/FixMyStreet/SendReport/Barnet.pm
+++ b/perllib/FixMyStreet/SendReport/Barnet.pm
@@ -10,31 +10,10 @@ use Utils;
use mySociety::Config;
use mySociety::Web qw(ent);
-# maximum number of webservice attempts to send before not trying any more (XXX may be better in config?)
-use constant SEND_FAIL_RETRIES_CUTOFF => 3;
-
# specific council numbers
use constant COUNCIL_ID_BARNET => 2489;
use constant MAX_LINE_LENGTH => 132;
-sub should_skip {
- my $self = shift;
- my $row = shift;
-
- my $council_name = 'Barnet';
- my $err_msg = "";
-
- if ($row->send_fail_count >= SEND_FAIL_RETRIES_CUTOFF) {
- $council_name &&= " to $council_name";
- $err_msg = "skipped: problem id=" . $row->id . " send$council_name has failed "
- . $row->send_fail_count . " times, cutoff is " . SEND_FAIL_RETRIES_CUTOFF;
-
- $self->skipped( $err_msg );
-
- return 1;
- }
-}
-
sub construct_message {
my %h = @_;
my $message = <<EOF;