From d9f5d6805f8d897e81e00208ab138bada05f8e9d Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew-github@dracos.co.uk>
Date: Wed, 19 Aug 2015 12:41:27 +0100
Subject: Test for DMARC when sending report email.

---
 perllib/FixMyStreet/Email.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 perllib/FixMyStreet/Email.pm

(limited to 'perllib/FixMyStreet/Email.pm')

diff --git a/perllib/FixMyStreet/Email.pm b/perllib/FixMyStreet/Email.pm
new file mode 100644
index 000000000..4a2784787
--- /dev/null
+++ b/perllib/FixMyStreet/Email.pm
@@ -0,0 +1,12 @@
+package FixMyStreet::Email;
+
+use Utils::Email;
+use FixMyStreet;
+
+sub test_dmarc {
+    my $email = shift;
+    return if FixMyStreet->test_mode;
+    return Utils::Email::test_dmarc($email);
+}
+
+1;
-- 
cgit v1.2.3