summaryrefslogtreecommitdiff
path: root/Propellor/Types
diff options
context:
space:
mode:
authorJoey Hess2014-04-19 10:47:38 -0400
committerJoey Hess2014-04-19 10:47:38 -0400
commit2279979d32b252d826c23288bb90a723d6a1147d (patch)
treefb2b0699310153103660fdeb2aec4c601b53a561 /Propellor/Types
parentcd10b5e2ed2a5e4053ae733a7c8961303f2dcb35 (diff)
Removed root domain records from SOA. Instead, use RootDomain when calling Dns.primary.
Diffstat (limited to 'Propellor/Types')
-rw-r--r--Propellor/Types/Dns.hs7
1 files changed, 3 insertions, 4 deletions
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)