diff options
Diffstat (limited to 'src/Network/BitTorrent/DHT/Message.hs')
-rw-r--r-- | src/Network/BitTorrent/DHT/Message.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Network/BitTorrent/DHT/Message.hs b/src/Network/BitTorrent/DHT/Message.hs index 49629755..83413752 100644 --- a/src/Network/BitTorrent/DHT/Message.hs +++ b/src/Network/BitTorrent/DHT/Message.hs | |||
@@ -30,7 +30,6 @@ module Network.BitTorrent.DHT.Message | |||
30 | import Control.Applicative | 30 | import Control.Applicative |
31 | import Data.BEncode as BE | 31 | import Data.BEncode as BE |
32 | import Data.BEncode.BDict | 32 | import Data.BEncode.BDict |
33 | import Data.ByteString as BS | ||
34 | import Data.List as L | 33 | import Data.List as L |
35 | import Data.Monoid | 34 | import Data.Monoid |
36 | import Data.Serialize as S | 35 | import Data.Serialize as S |
@@ -40,14 +39,13 @@ import Network.KRPC | |||
40 | 39 | ||
41 | import Data.Torrent.InfoHash | 40 | import Data.Torrent.InfoHash |
42 | import Network.BitTorrent.Core | 41 | import Network.BitTorrent.Core |
42 | import Network.BitTorrent.DHT.Token | ||
43 | import Network.KRPC () | 43 | import Network.KRPC () |
44 | 44 | ||
45 | {----------------------------------------------------------------------- | 45 | {----------------------------------------------------------------------- |
46 | -- envelopes | 46 | -- envelopes |
47 | -----------------------------------------------------------------------} | 47 | -----------------------------------------------------------------------} |
48 | 48 | ||
49 | type Token = ByteString | ||
50 | |||
51 | node_id_key :: BKey | 49 | node_id_key :: BKey |
52 | node_id_key = "id" | 50 | node_id_key = "id" |
53 | 51 | ||