cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

unused

This commit is contained in:
Joey Hess 2014-04-19 03:12:54 -04:00
parent ddd4f6402d
commit d9706c3348
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Propellor/Property/Dns.hs
View File

@ -4,7 +4,6 @@ module Propellor.Property.Dns (
secondary, secondary,
secondaryFor, secondaryFor,
mkSOA, mkSOA,
rootAddressesFrom,
writeZoneFile, writeZoneFile,
nextSerialNumber, nextSerialNumber,
adjustSerialNumber, adjustSerialNumber,
@ -165,9 +164,6 @@ mkSOA d sn rs = SOA
where where
hours n = n * 60 * 60 hours n = n * 60 * 60
rootAddressesFrom :: [Host] -> HostName -> [Record]
rootAddressesFrom hosts hn = map Address (hostAddresses hn hosts)
dValue :: BindDomain -> String dValue :: BindDomain -> String
dValue (RelDomain d) = d dValue (RelDomain d) = d
dValue (AbsDomain d) = d ++ "." dValue (AbsDomain d) = d ++ "."