From 873f0861240f33bea00adc629adba80c31b79694 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 28 Oct 2015 13:12:39 -0400 Subject: propellor spin --- src/Utility/ConcurrentOutput.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Utility/ConcurrentOutput.hs b/src/Utility/ConcurrentOutput.hs index 71055f14..faef2d00 100644 --- a/src/Utility/ConcurrentOutput.hs +++ b/src/Utility/ConcurrentOutput.hs @@ -186,7 +186,7 @@ createProcessConcurrent p firstprocess , do lcker <- outputLockedBy <$> getOutputHandle - l <- readMVar lcker + l <- tryReadMVar lcker hPutStrLn stderr $ show ("IS CONCURRENT", cmd, l) hFlush stderr concurrentprocess -- cgit v1.2.3