X-Git-Url: http://www.average.org/gitweb/?p=pdns-pipe-nmc.git;a=blobdiff_plain;f=NmcTransform.hs;h=de6fc0f3e82172475c5b722968199e9ad5cb81c3;hp=d29df7ee2715e8182487923fb8e93528d32db1d7;hb=9cdf03ec80c88e51fbcf0625b4f642fb8c6c4e1a;hpb=addaa72e7493ffef098e80e3a801d4101a0bc628 diff --git a/NmcTransform.hs b/NmcTransform.hs index d29df7e..de6fc0f 100644 --- a/NmcTransform.hs +++ b/NmcTransform.hs @@ -91,7 +91,7 @@ expandSrv base = sub3 = emptyNmcDom { domSrv = Just [srvStr] } proto = "_" ++ (srvProto sr) srvid = "_" ++ (srvName sr) - srvStr = (show (srvPrio sr)) ++ " " + srvStr = (show (srvPrio sr)) ++ "\t" ++ (show (srvWeight sr)) ++ " " ++ (show (srvPort sr)) ++ " " ++ (srvHost sr) @@ -99,7 +99,7 @@ expandSrv base = if srvName sr == "smtp" && srvProto sr == "tcp" && srvPort sr == 25 - then Just [(show (srvPrio sr)) ++ " " ++ (srvHost sr)] + then Just [(show (srvPrio sr)) ++ "\t" ++ (srvHost sr)] else Nothing -- | Convert map elements of the form "subN...sub2.sub1.dom.bit"