From 2e8df1a5a6610c43e0c1bda15d018fa16738061b Mon Sep 17 00:00:00 2001 From: Matthew Somerville Date: Mon, 19 Jan 2015 16:20:55 +0000 Subject: Tidy up of bin directory. Remove some unneeded scripts, move others to cobrand-specific directories. --- bin/update-send-questionnaire | 29 ----------------------------- 1 file changed, 29 deletions(-) delete mode 100755 bin/update-send-questionnaire (limited to 'bin/update-send-questionnaire') 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 -}); -- cgit v1.2.3