propellor

propellor config for hosts.
git clone git://git.ricketyspace.net/propellor.git
Log | Files | Refs | LICENSE

commit 77ff18bcddd11ce0ca582b22f9dc98c11d06abbc
parent cb90a05eb134f6a63dcda8f180058e2ab62a2d93
Author: rsiddharth <s@ricketyspace.net>
Date:   Sun, 17 Jun 2018 04:15:37 +0000

src: Propellor/Property/Dns.hs: rValue: Fix MTXT definition.

Diffstat:
src/Propellor/Property/Dns.hs | 9+++++++--
1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/src/Propellor/Property/Dns.hs b/src/Propellor/Property/Dns.hs @@ -326,9 +326,14 @@ rValue (INCLUDE f) = Just f rValue (TXT s) = Just $ [q] ++ filter (/= q) s ++ [q] where q = '"' -rValue (MTXT s) = Just $ [p] ++ [w] ++ (intercalate "\n\t" $ map (\x -> [q] ++ x ++ [q]) $ splitc n s) ++ [w] ++ [p] +rValue (MTXT s) = Just $ [op] ++ [w] + ++ (intercalate "\n\t" $ + map (\x -> [q] ++ filter (/= q) x ++ [q]) $ + splitc n s) + ++ [w] ++ [cp] where - p = '(' + op = '(' + cp = ')' w = ' ' q = '"' n = '\n'