more debug
This commit is contained in:
parent
274564b7d0
commit
d6b94c1d03
|
@ -195,12 +195,12 @@ provisionContainer cid = containerDesc cid $ Property "provision" $
|
||||||
|
|
||||||
go lastline (v:rest) = case v of
|
go lastline (v:rest) = case v of
|
||||||
StdoutLine s -> do
|
StdoutLine s -> do
|
||||||
debug ["stdout: ", s]
|
debug ["stdout: ", show s]
|
||||||
maybe noop putStrLn lastline
|
maybe noop putStrLn lastline
|
||||||
hFlush stdout
|
hFlush stdout
|
||||||
go (Just s) rest
|
go (Just s) rest
|
||||||
StderrLine s -> do
|
StderrLine s -> do
|
||||||
debug ["stderr: ", s]
|
debug ["stderr: ", show s]
|
||||||
maybe noop putStrLn lastline
|
maybe noop putStrLn lastline
|
||||||
hFlush stdout
|
hFlush stdout
|
||||||
hPutStrLn stderr s
|
hPutStrLn stderr s
|
||||||
|
|
Loading…
Reference in New Issue