summaryrefslogtreecommitdiff
path: root/src/Propellor
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor')
-rw-r--r--src/Propellor/Spin.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/Propellor/Spin.hs b/src/Propellor/Spin.hs
index 478d1517..0650e54d 100644
--- a/src/Propellor/Spin.hs
+++ b/src/Propellor/Spin.hs
@@ -64,7 +64,6 @@ spin' mprivdata relay target hst = do
getprivdata
-- And now we can run it.
- flushConcurrentOutput
unlessM (boolSystem "ssh" (map Param $ cacheparams ++ ["-t", sshtarget, shellWrap runcmd])) $
error "remote propellor failed"
where
@@ -105,8 +104,10 @@ spin' mprivdata relay target hst = do
d <- readPrivDataFile f
nukeFile f
return d
- | otherwise ->
- filterPrivData hst <$> decryptPrivData
+ | otherwise -> do
+ d <- filterPrivData hst <$> decryptPrivData
+ flushConcurrentOutput
+ return d
Just pd -> pure pd
-- Check if the Host contains an IP address that matches one of the IPs