From 2279979d32b252d826c23288bb90a723d6a1147d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 19 Apr 2014 10:47:38 -0400 Subject: Removed root domain records from SOA. Instead, use RootDomain when calling Dns.primary. --- Propellor/Types/Dns.hs | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'Propellor/Types/Dns.hs') diff --git a/Propellor/Types/Dns.hs b/Propellor/Types/Dns.hs index e367202a..9b2ad1e7 100644 --- a/Propellor/Types/Dns.hs +++ b/Propellor/Types/Dns.hs @@ -43,8 +43,6 @@ data SOA = SOA , sRetry :: Integer , sExpire :: Integer , sNegativeCacheTTL :: Integer - , sRecord :: [Record] - -- ^ Records for the root of the domain. Typically NS, A, TXT } deriving (Read, Show, Eq) @@ -76,6 +74,7 @@ type SerialNumber = Word32 -- Let's use a type to keep absolute domains straight from relative -- domains. -- --- The SOADomain refers to the root SOA record. -data BindDomain = RelDomain Domain | AbsDomain Domain | SOADomain +-- The RootDomain refers to the top level of the domain, so can be used +-- to add nameservers, MX's, etc to a domain. +data BindDomain = RelDomain Domain | AbsDomain Domain | RootDomain deriving (Read, Show, Eq, Ord) -- cgit v1.2.3