main: remove redundant import

diff --git a/src/main/Main.hs b/src/main/Main.hs
index c641fa065aa81e084ba5201510a4924050a177ef..623fe318e6ea6c8f856d79136edaa6b4ed84400e 100644 (file)
--- a/src/main/Main.hs
+++ b/src/main/Main.hs
@@ -4,7 +4,6 @@ module Main where
 import           Prelude hiding (log, length, readFile, getContents)
 
 import           Control.Concurrent (forkIO, killThread)
 import           Prelude hiding (log, length, readFile, getContents)
 
 import           Control.Concurrent (forkIO, killThread)

-import           Control.Monad.State (liftIO)

 import           Control.Concurrent.MVar (readMVar)
 import           Data.ByteString.Char8 (ByteString, getContents, readFile)
 import qualified FuncTorrent.FileSystem as FS (createMsgChannel, pieceMapFromFile, run)
 import           Control.Concurrent.MVar (readMVar)
 import           Data.ByteString.Char8 (ByteString, getContents, readFile)
 import qualified FuncTorrent.FileSystem as FS (createMsgChannel, pieceMapFromFile, run)