aboutsummaryrefslogtreecommitdiffstats
path: root/bin/update-send-questionnaire
diff options
context:
space:
mode:
Diffstat (limited to 'bin/update-send-questionnaire')
-rwxr-xr-xbin/update-send-questionnaire29
1 files changed, 0 insertions, 29 deletions
diff --git a/bin/update-send-questionnaire b/bin/update-send-questionnaire
deleted file mode 100755
index 7a231b919..000000000
--- a/bin/update-send-questionnaire
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/env perl
-
-=head1 DESCRIPTION
-
-Ad hoc script to update the send_questionnaire column on the
-reports in cobrands that don't send questionnaires at all.
-
-=cut
-
-use strict;
-use warnings;
-
-use FixMyStreet::App;
-
-my @cobrands;
-foreach my $cobrand ( FixMyStreet::Cobrand->available_cobrand_classes() ) {
- next unless $cobrand->{class};
- my $cls = $cobrand->{class}->new();
- push @cobrands, $cls->moniker if !$cls->send_questionnaires();
-}
-
-my $problems = FixMyStreet::App->model('DB::Problem')->search({
- cobrand => \@cobrands,
- send_questionnaire => 1,
-});
-
-$problems->update( {
- send_questionnaire => 0
-});