diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-10-24 14:49:08 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-10-24 14:49:08 -0400 |
| commit | 47c7cd08324d62e5660bab77bafc80c5ddb54655 (patch) | |
| tree | eb7912cb9589565c1f6f48d3cc21cbad87502534 /src/Propellor | |
| parent | 0d08ba360b576fe000a9ce67ce2082267aad9d5c (diff) | |
simplift
Diffstat (limited to 'src/Propellor')
| -rw-r--r-- | src/Propellor/Engine.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Engine.hs b/src/Propellor/Engine.hs index 8c1d09c6..a811724a 100644 --- a/src/Propellor/Engine.hs +++ b/src/Propellor/Engine.hs @@ -55,7 +55,7 @@ mainProperties host = do -- are then also run. runPropellor :: Host -> Propellor Result -> IO Result runPropellor host a = do - (res, _s, endactions) <- runRWST (runWithHost a) host () + (res, endactions) <- evalRWST (runWithHost a) host () endres <- mapM (runEndAction host res) endactions return $ mconcat (res:endres) |