distorted.lisp: Add a DMARC policy record.

diff --git a/distorted.lisp b/distorted.lisp
index 8ff1a3a640d39aa07351be1c05f71df5741f29d3..141fee3533432015ea88c189a41e9f5f32e7135c 100644 (file)
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -84,6 +84,7 @@ (defzone distorted.org.uk
   ((@ mail blackhole) :mx mail :srv ((:smtp mail)))
   (bugs :mx lists :srv ((:smtp bugs)))
   (lists :mx lists :srv ((:smtp lists)))
   ((@ mail blackhole) :mx mail :srv ((:smtp mail)))
   (bugs :mx lists :srv ((:smtp bugs)))
   (lists :mx lists :srv ((:smtp lists)))

+  (_dmarc :dmarc (:v "DMARC1" :p "none" :sp "none" :adkim "s" :aspf "s"))

   ((_domainkey _domainkey.mail) :dname stratocaster.dkim)
   ((stratocaster @ mail) :spf ((:version "spf1")
                               (:pass :ip stratocaster.dmz)
   ((_domainkey _domainkey.mail) :dname stratocaster.dkim)
   ((stratocaster @ mail) :spf ((:version "spf1")
                               (:pass :ip stratocaster.dmz)