diff options
Diffstat (limited to 'src/Network')
-rw-r--r-- | src/Network/Torrent.hs | 2 | ||||
-rw-r--r-- | src/Network/Torrent/PeerWire.hs | 5 | ||||
-rw-r--r-- | src/Network/Torrent/PeerWire/Handshake.hs (renamed from src/Network/Torrent/Handshake.hs) | 2 |
3 files changed, 5 insertions, 4 deletions
diff --git a/src/Network/Torrent.hs b/src/Network/Torrent.hs index a9194d3e..a37bee41 100644 --- a/src/Network/Torrent.hs +++ b/src/Network/Torrent.hs | |||
@@ -2,10 +2,8 @@ module Network.Torrent | |||
2 | ( module Network.Torrent.PeerID | 2 | ( module Network.Torrent.PeerID |
3 | , module Network.Torrent.Tracker | 3 | , module Network.Torrent.Tracker |
4 | , module Network.Torrent.PeerWire | 4 | , module Network.Torrent.PeerWire |
5 | , module Network.Torrent.Handshake | ||
6 | ) where | 5 | ) where |
7 | 6 | ||
8 | import Network.Torrent.PeerID | 7 | import Network.Torrent.PeerID |
9 | import Network.Torrent.Tracker | 8 | import Network.Torrent.Tracker |
10 | import Network.Torrent.PeerWire | 9 | import Network.Torrent.PeerWire |
11 | import Network.Torrent.Handshake | ||
diff --git a/src/Network/Torrent/PeerWire.hs b/src/Network/Torrent/PeerWire.hs index b1fae9f2..27ecda79 100644 --- a/src/Network/Torrent/PeerWire.hs +++ b/src/Network/Torrent/PeerWire.hs | |||
@@ -1,8 +1,11 @@ | |||
1 | {-# LANGUAGE DoAndIfThenElse #-} | 1 | {-# LANGUAGE DoAndIfThenElse #-} |
2 | module Network.Torrent.PeerWire | 2 | module Network.Torrent.PeerWire |
3 | ( Message(..), Block(..), BlockIx(..), | 3 | ( module Network.Torrent.PeerWire.Handshake |
4 | , Message(..), Block(..), BlockIx(..), | ||
4 | ) where | 5 | ) where |
5 | 6 | ||
7 | import Network.Torrent.PeerWire.Handshake | ||
8 | |||
6 | import Control.Applicative | 9 | import Control.Applicative |
7 | import Data.ByteString (ByteString) | 10 | import Data.ByteString (ByteString) |
8 | import qualified Data.ByteString as B | 11 | import qualified Data.ByteString as B |
diff --git a/src/Network/Torrent/Handshake.hs b/src/Network/Torrent/PeerWire/Handshake.hs index c14fd591..7bdb7fef 100644 --- a/src/Network/Torrent/Handshake.hs +++ b/src/Network/Torrent/PeerWire/Handshake.hs | |||
@@ -1,5 +1,5 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | 1 | {-# LANGUAGE OverloadedStrings #-} |
2 | module Network.Torrent.Handshake | 2 | module Network.Torrent.PeerWire.Handshake |
3 | ( Handshake | 3 | ( Handshake |
4 | , defaultProtocol, defaultReserved, defaultHandshake | 4 | , defaultProtocol, defaultReserved, defaultHandshake |
5 | ) where | 5 | ) where |