move handshake to PeerWire

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
        ( module Network.Torrent.PeerID
        , module Network.Torrent.Tracker
        , module Network.Torrent.PeerWire
-       , module Network.Torrent.Handshake
        ) where
 
 import Network.Torrent.PeerID
 import Network.Torrent.Tracker
 import Network.Torrent.PeerWire
-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 @@
 {-# LANGUAGE DoAndIfThenElse #-}
 module Network.Torrent.PeerWire
-       ( Message(..), Block(..), BlockIx(..),
+       ( module Network.Torrent.PeerWire.Handshake
+       , Message(..), Block(..), BlockIx(..),
        ) where
 
+import Network.Torrent.PeerWire.Handshake
+
 import Control.Applicative
 import           Data.ByteString (ByteString)
 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 @@
 {-# LANGUAGE OverloadedStrings #-}
-module Network.Torrent.Handshake
+module Network.Torrent.PeerWire.Handshake
        ( Handshake
        , defaultProtocol, defaultReserved, defaultHandshake
        ) where