diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-02-15 15:27:58 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-02-15 15:29:41 -0400 |
commit | 7eb83f6f712606d13b4083affff19126d9fb0f75 (patch) | |
tree | b687d51c3960bbc26ff2b1f282899479261a967c /Messages/Progress.hs | |
parent | a84433f0b887f934043f7ac65ec5fc4614cb22f7 (diff) |
fix build w/o concurrent-output
Diffstat (limited to 'Messages/Progress.hs')
-rw-r--r-- | Messages/Progress.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Messages/Progress.hs b/Messages/Progress.hs index 6bbf43f4c..1583d922b 100644 --- a/Messages/Progress.hs +++ b/Messages/Progress.hs @@ -45,8 +45,8 @@ metered combinemeterupdate key a = case keySize key of maybe noop (\m -> m n) combinemeterupdate liftIO $ clearMeter stdout meter return r -#if WITH_CONCURRENTOUTPUT go size o@(ConcurrentOutput {}) +#if WITH_CONCURRENTOUTPUT | concurrentOutputEnabled o = withProgressRegion $ \r -> do (progress, meter) <- mkmeter size a $ \n -> liftIO $ do |