distorted.lisp: Reformat mail server SRV records.
authorMark Wooding <mdw@distorted.org.uk>
Tue, 9 Jun 2015 22:15:54 +0000 (23:15 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Tue, 9 Jun 2015 22:15:54 +0000 (23:15 +0100)
This makes it easier to add more.

distorted.lisp

index 3c33a50..4794842 100644 (file)
                     (chiark.ns :ip chiark.greenend.org.uk))
 
   ;; Mail servers.
-  ((@ mail blackhole)
-   :mx mail
-   :srv ((:smtp mail)))
-  ((lists)
-   :ttl 300
-   :mx lists
-   :srv ((:smtp lists)))
+  ((@ mail blackhole) :mx mail :srv ((:smtp mail)))
+  ((lists) :ttl 300 :mx lists :srv ((:smtp lists)))
 
   (stratocaster.20140403._domainkey
    :dkim ("stratocaster-20140403"