@@ -16,7 +16,6 @@ import Control.Exception (bracket, finally, Exception,
16import qualified Control.Exception as E
16import qualified Control.Exception as E
17import System.IO (Handle, hClose)
17import System.IO (Handle, hClose)
18import Control.Concurrent (forkIO, threadDelay)
18import Control.Concurrent (forkIO, threadDelay)
19−import Control.Monad (forM)
21import qualified Control.Concurrent.MVar as M
20import qualified Control.Concurrent.MVar as M
22import qualified Control.Concurrent.Chan as C
21import qualified Control.Concurrent.Chan as C