more debug

This commit is contained in:
Joey Hess 2014-04-01 14:33:03 -04:00
parent 274564b7d0
commit d6b94c1d03
Failed to extract signature
1 changed files with 2 additions and 2 deletions

View File

@ -195,12 +195,12 @@ provisionContainer cid = containerDesc cid $ Property "provision" $
go lastline (v:rest) = case v of
StdoutLine s -> do
debug ["stdout: ", s]
debug ["stdout: ", show s]
maybe noop putStrLn lastline
hFlush stdout
go (Just s) rest
StderrLine s -> do
debug ["stderr: ", s]
debug ["stderr: ", show s]
maybe noop putStrLn lastline
hFlush stdout
hPutStrLn stderr s