summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoey Hess2016-03-06 15:54:52 -0400
committerJoey Hess2016-03-06 15:54:52 -0400
commit9e748e9f0d879bd58618f8a9ec48bd1c2e25ab65 (patch)
tree097e152c6cd9a38fc6bd0a4709421fc4be83a02a
parente80c94b262870db031fd6714113dca7a19f29671 (diff)
back
-rw-r--r--src/System/Console/Concurrent/Internal.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/System/Console/Concurrent/Internal.hs b/src/System/Console/Concurrent/Internal.hs
index ada55e83..5b9cf454 100644
--- a/src/System/Console/Concurrent/Internal.hs
+++ b/src/System/Console/Concurrent/Internal.hs
@@ -297,7 +297,7 @@ fgProcess p = do
return (toConcurrentProcessHandle r)
debug :: [String] -> IO ()
-debug = hPutStrLn stderr . unwords
+debug = debugM "concurrent-output" . unwords
showProc :: P.CreateProcess -> String
showProc = go . P.cmdspec