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