From 42e965e4ebde989cec7ce4c0d1b284cd54a16b64 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 28 Oct 2015 12:51:17 -0400 Subject: propellor spin --- src/Utility/ConcurrentOutput.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Utility') 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 -- cgit v1.2.3