summaryrefslogtreecommitdiff
path: root/src/Utility/ConcurrentOutput.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Utility/ConcurrentOutput.hs')
-rw-r--r--src/Utility/ConcurrentOutput.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Utility/ConcurrentOutput.hs b/src/Utility/ConcurrentOutput.hs
index 8cb81c61..7868ffd4 100644
--- a/src/Utility/ConcurrentOutput.hs
+++ b/src/Utility/ConcurrentOutput.hs
@@ -170,7 +170,7 @@ createProcessConcurrent p
, do
lcker <- outputLockedBy <$> getOutputHandle
l <- readMVar lcker
- hPutStrLn stderr $ show ("IS CONCURRENT", l)
+ hPutStrLn stderr $ show ("IS CONCURRENT", cmd, l)
concurrentprocess
)
| otherwise = P.createProcess p