diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-11-26 07:21:05 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-11-26 07:21:05 -0400 |
| commit | d519f507c006071972cfa193963980c7f28b09e9 (patch) | |
| tree | 265bfa656e74acb31f5ba3a9051000c81fa2e7c6 /src/Propellor/Property/Postfix.hs | |
| parent | 08a03bb4555e28ea7ebe5445d6dd250b06b18f45 (diff) | |
| parent | cb97f272633f44edb9ad53982ea9f4bdb8c7192e (diff) | |
Merge branch 'joeyconfig'
Diffstat (limited to 'src/Propellor/Property/Postfix.hs')
| -rw-r--r-- | src/Propellor/Property/Postfix.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Postfix.hs b/src/Propellor/Property/Postfix.hs index 5e265e6f..20492dc6 100644 --- a/src/Propellor/Property/Postfix.hs +++ b/src/Propellor/Property/Postfix.hs @@ -162,7 +162,7 @@ saslAuthdInstalled = setupdaemon -- -- The password is taken from the privdata. saslPasswdSet :: Domain -> User -> Property HasInfo -saslPasswdSet domain (User user) = withPrivData src ctx $ \getpw -> +saslPasswdSet domain (User user) = withPrivData src ctx $ \getpw -> trivial $ property ("sasl password for " ++ uatd) $ getpw $ \pw -> makeChange $ withHandle StdinHandle createProcessSuccess p $ \h -> do hPutStrLn h (privDataVal pw) |