From: Ramakrishnan Muthukrishnan <ram@rkrishnan.org>
Date: Sun, 10 Jul 2016 07:55:28 +0000 (+0530)
Subject: cleanups on various module imports
X-Git-Url: https://git.rkrishnan.org/pf/content/en/seg/about/module-simplejson._speedups.html?a=commitdiff_plain;h=59296ba214eb4eb96012618d98d6c1a6e214e790;p=functorrent.git

cleanups on various module imports
---

diff --git a/src/FuncTorrent/Peer.hs b/src/FuncTorrent/Peer.hs
index c833c06..bf1153b 100644
--- a/src/FuncTorrent/Peer.hs
+++ b/src/FuncTorrent/Peer.hs
@@ -20,8 +20,7 @@
 {-# LANGUAGE OverloadedStrings #-}
 
 module FuncTorrent.Peer
-    (PieceMap,
-     handlePeerMsgs
+    (handlePeerMsgs
     ) where
 
 import Prelude hiding (lookup, concat, replicate, splitAt, take, drop)
diff --git a/src/FuncTorrent/Server.hs b/src/FuncTorrent/Server.hs
index 3827aa2..d8a18ff 100644
--- a/src/FuncTorrent/Server.hs
+++ b/src/FuncTorrent/Server.hs
@@ -27,8 +27,9 @@ import Network (withSocketsDo, listenOn, accept, Socket, PortID ( PortNumber ))
 import System.IO (hSetBuffering, BufferMode ( NoBuffering ))
 
 import FuncTorrent.Metainfo (Metainfo)
-import FuncTorrent.Peer (handlePeerMsgs, PieceMap)
+import FuncTorrent.Peer (handlePeerMsgs)
 import FuncTorrent.PeerMsgs (Peer(..))
+import FuncTorrent.PieceManager (PieceMap)
 import qualified FuncTorrent.FileSystem as FS (MsgChannel)
 
 -- server is listening on any port from 6881 - 6889