Test for DMARC when sending report email.

1 files changed, 12 insertions, 0 deletions

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;