Merge tag 'v2.2' into fiksgatami-dev

1 files changed, 32 insertions, 0 deletions

diff --git a/perllib/FixMyStreet/Test.pm b/perllib/FixMyStreet/Test.pm
new file mode 100644
index 000000000..572ae0a44
--- /dev/null
+++ b/perllib/FixMyStreet/Test.pm
@@ -0,0 +1,32 @@
+package FixMyStreet::Test;
+
+use parent qw(Exporter);
+
+use strict;
+use warnings FATAL => 'all';
+use utf8;
+use Test::More;
+use mySociety::Locale;
+use FixMyStreet::DB;
+
+my $db = FixMyStreet::DB->schema->storage;
+
+sub import {
+    strict->import;
+    warnings->import(FATAL => 'all');
+    utf8->import;
+    Test::More->export_to_level(1);
+    $db->txn_begin;
+}
+
+BEGIN {
+    use FixMyStreet;
+    FixMyStreet->test_mode(1);
+    mySociety::Locale::gettext_domain('FixMyStreet', 1);
+}
+
+END {
+    $db->txn_rollback if $db;
+}
+
+1;