From d13ace4eddb581167544de5e5f788ab6d5836041 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <kleen@cip.ifi.lmu.de>
Date: Thu, 26 Sep 2019 13:37:38 +0200
Subject: [PATCH] fix: fix build

---
 src/Jobs.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Jobs.hs b/src/Jobs.hs
index 587aa9ac3..a78b8dc39 100644
--- a/src/Jobs.hs
+++ b/src/Jobs.hs
@@ -154,7 +154,7 @@ manageJobPool foundation@UniWorX{..} unmask = shutdownOnException $
             void $ wait actAsync
             throwM e
   
-      unmask (wait actAsync) `catchAll` handleExc
+      liftIO (unmask $ wait actAsync) `catchAll` handleExc
     
     num :: Int
     num = fromIntegral $ foundation ^. _appJobWorkers