summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoey Hess2014-04-01 14:33:03 -0400
committerJoey Hess2014-04-01 14:33:03 -0400
commitd6b94c1d03b7e185e751e8d4f4fda8dc004e98c5 (patch)
tree50c3c35c6b7b35225d6b5bd916f81228113449f4
parent274564b7d0152ef28bae4a0a5066e4af1b79474e (diff)
more debug
-rw-r--r--Propellor/Property/Docker.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Propellor/Property/Docker.hs b/Propellor/Property/Docker.hs
index 32ce847d..9eecc1a1 100644
--- a/Propellor/Property/Docker.hs
+++ b/Propellor/Property/Docker.hs
@@ -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