From 1e22d4d33ad6b7da93f7fd1fd757f10d74d98309 Mon Sep 17 00:00:00 2001 From: Sam Truzjan Date: Fri, 27 Dec 2013 12:58:17 +0400 Subject: Add naive session tokens implementation --- src/Network/BitTorrent/DHT/Message.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'src/Network/BitTorrent/DHT/Message.hs') 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 import Control.Applicative import Data.BEncode as BE import Data.BEncode.BDict -import Data.ByteString as BS import Data.List as L import Data.Monoid import Data.Serialize as S @@ -40,14 +39,13 @@ import Network.KRPC import Data.Torrent.InfoHash import Network.BitTorrent.Core +import Network.BitTorrent.DHT.Token import Network.KRPC () {----------------------------------------------------------------------- -- envelopes -----------------------------------------------------------------------} -type Token = ByteString - node_id_key :: BKey node_id_key = "id" -- cgit v1.2.3