diff --git a/src/Propellor/Engine.hs b/src/Propellor/Engine.hs index 0b65fb7..b0b1695 100644 --- a/src/Propellor/Engine.hs +++ b/src/Propellor/Engine.hs @@ -77,6 +77,7 @@ processChainOutput h = go Nothing where go lastline = do v <- catchMaybeIO (hGetLine h) + debug ["read from chained propellor: ", show v] case v of Nothing -> case lastline of Nothing -> pure FailedChange