sort out use statements

4 files changed, 23 insertions, 22 deletions

diff --git a/perllib/FixMyStreet/DB/ResultSet/Problem.pm b/perllib/FixMyStreet/DB/ResultSet/Problem.pm
index cfd7f9b40..17282a656 100644
--- a/perllib/FixMyStreet/DB/ResultSet/Problem.pm
+++ b/perllib/FixMyStreet/DB/ResultSet/Problem.pm
@@ -4,6 +4,14 @@ use base 'DBIx::Class::ResultSet';
 use strict;
 use warnings;
 
+use CronFns;
+
+use Utils;
+use mySociety::Config;
+use mySociety::EmailUtil;
+use mySociety::MaPit;
+
+use FixMyStreet::App;
 use FixMyStreet::SendReport::Email;
 
 my $site_restriction;
@@ -207,28 +215,6 @@ sub categories_summary {
 }
 
 sub send_reports {
-
-
-    use Digest::MD5;
-    use Encode;
-    use Error qw(:try);
-    use JSON;
-    use LWP::UserAgent;
-    use LWP::Simple;
-    use CGI; # Trying awkward kludge
-    use CronFns;
-
-    use FixMyStreet::App;
-
-    use EastHantsWSDL;
-    use Utils;
-    use mySociety::Config;
-    use mySociety::EmailUtil;
-    use mySociety::MaPit;
-    use mySociety::Web qw(ent);
-
-    use Open311;
-
     # Set up site, language etc.
     my ($verbose, $nomail) = CronFns::options();
     my $base_url = mySociety::Config::get('BASE_URL');
diff --git a/perllib/FixMyStreet/SendReport/EastHants.pm b/perllib/FixMyStreet/SendReport/EastHants.pm
index 768587b03..0e9944b18 100644
--- a/perllib/FixMyStreet/SendReport/EastHants.pm
+++ b/perllib/FixMyStreet/SendReport/EastHants.pm
@@ -1,5 +1,10 @@
 package FixMyStreet::SendReport::Email;
 
+use Error qw(:try);
+use Encode;
+use mySociety::Web qw(ent);
+use EastHantsWSDL;
+
 my %councils = ();
 my @to;
 
diff --git a/perllib/FixMyStreet/SendReport/London.pm b/perllib/FixMyStreet/SendReport/London.pm
index 3d4ce89c2..cb76c7a24 100644
--- a/perllib/FixMyStreet/SendReport/London.pm
+++ b/perllib/FixMyStreet/SendReport/London.pm
@@ -1,5 +1,11 @@
 package FixMyStreet::SendReport::Email;
 
+use Digest::MD5;
+use LWP::UserAgent;
+use LWP::Simple;
+
+use Utils;
+
 my %councils = ();
 my @to;
 
diff --git a/perllib/FixMyStreet/SendReport/Open311.pm b/perllib/FixMyStreet/SendReport/Open311.pm
index a7f6e67d1..a76c44cce 100644
--- a/perllib/FixMyStreet/SendReport/Open311.pm
+++ b/perllib/FixMyStreet/SendReport/Open311.pm
@@ -1,5 +1,9 @@
 package FixMyStreet::SendReport::Open311;
 
+use FixMyStreet::App;
+use mySociety::Config;
+use Open311;
+
 my %councils = ();
 my @to;