summaryrefslogtreecommitdiff
path: root/src/Propellor/Info.hs
diff options
context:
space:
mode:
authorJoey Hess2015-01-04 14:20:22 -0400
committerJoey Hess2015-01-04 14:22:44 -0400
commitbb7b8e789104a77b12030df5fe508afbe0eac2a5 (patch)
treee0fa55fe5ebed586b9397b7635d1875534fc28a4 /src/Propellor/Info.hs
parent43e15c8addef95d300fbf1a84b06def9fd099c4d (diff)
add $INCLUDE of pubkeys before zone file is written, to avoid pogoing
Diffstat (limited to 'src/Propellor/Info.hs')
-rw-r--r--src/Propellor/Info.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Propellor/Info.hs b/src/Propellor/Info.hs
index 0437f8ec..3af3fc15 100644
--- a/src/Propellor/Info.hs
+++ b/src/Propellor/Info.hs
@@ -64,6 +64,7 @@ addDNS r = pureInfoProperty (rdesc r) $ mempty { _dns = S.singleton r }
rdesc (NS d) = unwords ["NS", ddesc d]
rdesc (TXT s) = unwords ["TXT", s]
rdesc (SRV x y z d) = unwords ["SRV", show x, show y, show z, ddesc d]
+ rdesc (INCLUDE f) = unwords ["$INCLUDE", f]
ddesc (AbsDomain domain) = domain
ddesc (RelDomain domain) = domain