From 1ad7a7ab8f41ac7c10eebac17907fe15b1483d4f Mon Sep 17 00:00:00 2001 From: Eugene Crosser Date: Mon, 21 Apr 2014 12:57:56 +0400 Subject: [PATCH] format of MX and SRV needs one more tab --- NmcTransform.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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" -- 2.39.2