From 4d38e8bfd65e935819b6c0ba07d746232de9eb08 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 18 Jul 2014 13:09:55 -0400 Subject: propellor spin --- src/Propellor/Property/Postfix.hs | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) diff --git a/src/Propellor/Property/Postfix.hs b/src/Propellor/Property/Postfix.hs index 1a4a313a..52c329bd 100644 --- a/src/Propellor/Property/Postfix.hs +++ b/src/Propellor/Property/Postfix.hs @@ -31,12 +31,16 @@ satellite = check norelayhost setup setup = trivial $ property "postfix satellite system" $ do hn <- asks hostName let (_, domain) = separate (== '.') hn - ensureProperty $ Apt.reConfigure "postfix" - [ ("postfix/main_mailer_type", "select", "Satellite system") - , ("postfix/root_address", "string", "root") - , ("postfix/destinations", "string", " ") - , ("postfix/mailname", "string", hn) - , ("postfix/relayhost", "string", "smtp." ++ domain) + ensureProperties + [ Apt.reConfigure "postfix" + [ ("postfix/main_mailer_type", "select", "Satellite system") + , ("postfix/root_address", "string", "root") + , ("postfix/destinations", "string", " ") + , ("postfix/mailname", "string", hn) + ] + , mainCf `containsLine` ("relayhost = " ++ domain) + `onChange` dedupMainCf + `onChange` reloaded ] norelayhost = not . any relayhostset . lines <$> readProcess "postconf" [] -- cgit v1.2.3