From bf3dc8b3b21d267758e429d01c73048dc8be99b5 Mon Sep 17 00:00:00 2001 From: Sam Truzjan Date: Thu, 20 Feb 2014 07:19:08 +0400 Subject: Fix some warnings --- src/Network/BitTorrent/Exchange/Session.hs | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) (limited to 'src/Network/BitTorrent/Exchange/Session.hs') diff --git a/src/Network/BitTorrent/Exchange/Session.hs b/src/Network/BitTorrent/Exchange/Session.hs index b6ee800a..88554807 100644 --- a/src/Network/BitTorrent/Exchange/Session.hs +++ b/src/Network/BitTorrent/Exchange/Session.hs @@ -16,19 +16,13 @@ import Control.Exception hiding (Handler) import Control.Lens import Control.Monad.Logger import Control.Monad.Reader -import Control.Monad.State import Data.ByteString as BS import Data.ByteString.Lazy as BL import Data.Conduit import Data.Conduit.List as CL (iterM) -import Data.Function -import Data.IORef -import Data.List as L import Data.Maybe import Data.Map as M import Data.Monoid -import Data.Ord -import Data.Set as S import Data.Text as T import Data.Typeable import Text.PrettyPrint hiding ((<>)) @@ -40,9 +34,8 @@ import Data.Torrent (InfoDict (..)) import Data.Torrent.Bitfield as BF import Data.Torrent.InfoHash import Data.Torrent.Piece -import qualified Data.Torrent.Piece as Torrent (Piece (Piece)) +import qualified Data.Torrent.Piece as Torrent (Piece ()) import Network.BitTorrent.Core -import Network.BitTorrent.Exchange.Assembler import Network.BitTorrent.Exchange.Block as Block import Network.BitTorrent.Exchange.Message as Message import Network.BitTorrent.Exchange.Session.Metadata as Metadata -- cgit v1.2.3