diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-01 14:33:03 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-01 14:33:03 -0400 |
| commit | d6b94c1d03b7e185e751e8d4f4fda8dc004e98c5 (patch) | |
| tree | 50c3c35c6b7b35225d6b5bd916f81228113449f4 /Propellor | |
| parent | 274564b7d0152ef28bae4a0a5066e4af1b79474e (diff) | |
more debug
Diffstat (limited to 'Propellor')
| -rw-r--r-- | Propellor/Property/Docker.hs | 4 |
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 |