diff options
Diffstat (limited to 'src/Network/BitTorrent')
-rw-r--r-- | src/Network/BitTorrent/Exchange.hs | 6 | ||||
-rw-r--r-- | src/Network/BitTorrent/Exchange/Protocol.hs | 2 | ||||
-rw-r--r-- | src/Network/BitTorrent/Exchange/Selection.hs | 4 | ||||
-rw-r--r-- | src/Network/BitTorrent/Exchange/Status.hs | 2 |
4 files changed, 7 insertions, 7 deletions
diff --git a/src/Network/BitTorrent/Exchange.hs b/src/Network/BitTorrent/Exchange.hs index 08e3f388..d75fdf96 100644 --- a/src/Network/BitTorrent/Exchange.hs +++ b/src/Network/BitTorrent/Exchange.hs | |||
@@ -6,10 +6,10 @@ | |||
6 | -- Portability : portable | 6 | -- Portability : portable |
7 | -- | 7 | -- |
8 | {-# LANGUAGE DoAndIfThenElse #-} | 8 | {-# LANGUAGE DoAndIfThenElse #-} |
9 | module Network.BitTorrent.PeerWire (module PW) where | 9 | module Network.BitTorrent.Exchange (module PW) where |
10 | 10 | ||
11 | import Network.BitTorrent.PeerWire.Selection as PW | 11 | import Network.BitTorrent.Exchange.Selection as PW |
12 | import Network.BitTorrent.PeerWire.Protocol as PW | 12 | import Network.BitTorrent.Exchange.Protocol as PW |
13 | 13 | ||
14 | {- | 14 | {- |
15 | 15 | ||
diff --git a/src/Network/BitTorrent/Exchange/Protocol.hs b/src/Network/BitTorrent/Exchange/Protocol.hs index cab54ef5..8cfcc79d 100644 --- a/src/Network/BitTorrent/Exchange/Protocol.hs +++ b/src/Network/BitTorrent/Exchange/Protocol.hs | |||
@@ -12,7 +12,7 @@ | |||
12 | -- | 12 | -- |
13 | {-# LANGUAGE OverloadedStrings #-} | 13 | {-# LANGUAGE OverloadedStrings #-} |
14 | {-# LANGUAGE RecordWildCards #-} | 14 | {-# LANGUAGE RecordWildCards #-} |
15 | module Network.BitTorrent.PeerWire.Protocol | 15 | module Network.BitTorrent.Exchange.Protocol |
16 | ( -- * Inital handshake | 16 | ( -- * Inital handshake |
17 | Handshake(..), ppHandshake | 17 | Handshake(..), ppHandshake |
18 | , handshake , handshakeCaps | 18 | , handshake , handshakeCaps |
diff --git a/src/Network/BitTorrent/Exchange/Selection.hs b/src/Network/BitTorrent/Exchange/Selection.hs index db9e04f4..ef47876a 100644 --- a/src/Network/BitTorrent/Exchange/Selection.hs +++ b/src/Network/BitTorrent/Exchange/Selection.hs | |||
@@ -21,7 +21,7 @@ | |||
21 | -- Note that BitTorrent applies the strict priority policy for | 21 | -- Note that BitTorrent applies the strict priority policy for |
22 | -- /subpiece/ or /blocks/ selection. | 22 | -- /subpiece/ or /blocks/ selection. |
23 | -- | 23 | -- |
24 | module Network.BitTorrent.PeerWire.Selection | 24 | module Network.BitTorrent.Exchange.Selection |
25 | ( Selector | 25 | ( Selector |
26 | 26 | ||
27 | -- * Construction | 27 | -- * Construction |
@@ -34,7 +34,7 @@ module Network.BitTorrent.PeerWire.Selection | |||
34 | 34 | ||
35 | import Data.Bitfield | 35 | import Data.Bitfield |
36 | import Data.Ratio | 36 | import Data.Ratio |
37 | import Network.BitTorrent.PeerWire.Protocol | 37 | import Network.BitTorrent.Exchange.Protocol |
38 | 38 | ||
39 | 39 | ||
40 | type Selector = Bitfield -- ^ Indices of client /have/ pieces. | 40 | type Selector = Bitfield -- ^ Indices of client /have/ pieces. |
diff --git a/src/Network/BitTorrent/Exchange/Status.hs b/src/Network/BitTorrent/Exchange/Status.hs index 806ba77d..353ef14d 100644 --- a/src/Network/BitTorrent/Exchange/Status.hs +++ b/src/Network/BitTorrent/Exchange/Status.hs | |||
@@ -5,7 +5,7 @@ | |||
5 | -- Stability : experimental | 5 | -- Stability : experimental |
6 | -- Portability : portable | 6 | -- Portability : portable |
7 | -- | 7 | -- |
8 | module Network.BitTorrent.Peer.Status | 8 | module Network.BitTorrent.Exchange.Status |
9 | ( PeerStatus(..) | 9 | ( PeerStatus(..) |
10 | , setChoking, setInterested | 10 | , setChoking, setInterested |
11 | , initPeerStatus | 11 | , initPeerStatus |