summaryrefslogtreecommitdiff
path: root/src/System/Console/Concurrent/Internal.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/System/Console/Concurrent/Internal.hs')
-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