diff options
| -rw-r--r-- | src/Propellor/Spin.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/Propellor/Spin.hs b/src/Propellor/Spin.hs index 0650e54d..478d1517 100644 --- a/src/Propellor/Spin.hs +++ b/src/Propellor/Spin.hs @@ -64,6 +64,7 @@ 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 @@ -104,10 +105,8 @@ spin' mprivdata relay target hst = do d <- readPrivDataFile f nukeFile f return d - | otherwise -> do - d <- filterPrivData hst <$> decryptPrivData - flushConcurrentOutput - return d + | otherwise -> + filterPrivData hst <$> decryptPrivData Just pd -> pure pd -- Check if the Host contains an IP address that matches one of the IPs |
