summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/Exchange/Session.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/BitTorrent/Exchange/Session.hs')
-rw-r--r--src/Network/BitTorrent/Exchange/Session.hs9
1 files changed, 1 insertions, 8 deletions
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)
16import Control.Lens 16import Control.Lens
17import Control.Monad.Logger 17import Control.Monad.Logger
18import Control.Monad.Reader 18import Control.Monad.Reader
19import Control.Monad.State
20import Data.ByteString as BS 19import Data.ByteString as BS
21import Data.ByteString.Lazy as BL 20import Data.ByteString.Lazy as BL
22import Data.Conduit 21import Data.Conduit
23import Data.Conduit.List as CL (iterM) 22import Data.Conduit.List as CL (iterM)
24import Data.Function
25import Data.IORef
26import Data.List as L
27import Data.Maybe 23import Data.Maybe
28import Data.Map as M 24import Data.Map as M
29import Data.Monoid 25import Data.Monoid
30import Data.Ord
31import Data.Set as S
32import Data.Text as T 26import Data.Text as T
33import Data.Typeable 27import Data.Typeable
34import Text.PrettyPrint hiding ((<>)) 28import Text.PrettyPrint hiding ((<>))
@@ -40,9 +34,8 @@ import Data.Torrent (InfoDict (..))
40import Data.Torrent.Bitfield as BF 34import Data.Torrent.Bitfield as BF
41import Data.Torrent.InfoHash 35import Data.Torrent.InfoHash
42import Data.Torrent.Piece 36import Data.Torrent.Piece
43import qualified Data.Torrent.Piece as Torrent (Piece (Piece)) 37import qualified Data.Torrent.Piece as Torrent (Piece ())
44import Network.BitTorrent.Core 38import Network.BitTorrent.Core
45import Network.BitTorrent.Exchange.Assembler
46import Network.BitTorrent.Exchange.Block as Block 39import Network.BitTorrent.Exchange.Block as Block
47import Network.BitTorrent.Exchange.Message as Message 40import Network.BitTorrent.Exchange.Message as Message
48import Network.BitTorrent.Exchange.Session.Metadata as Metadata 41import Network.BitTorrent.Exchange.Session.Metadata as Metadata