format of MX and SRV needs one more tab
authorEugene Crosser <crosser@average.org>
Mon, 21 Apr 2014 08:57:56 +0000 (12:57 +0400)
committerEugene Crosser <crosser@average.org>
Mon, 21 Apr 2014 08:57:56 +0000 (12:57 +0400)
NmcTransform.hs

index d29df7ee2715e8182487923fb8e93528d32db1d7..de6fc0f3e82172475c5b722968199e9ad5cb81c3 100644 (file)
@@ -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"