1 files changed, 1 insertions, 0 deletions
diff --git a/src/Network/BitTorrent/DHT.hs b/src/Network/BitTorrent/DHT.hs
index 98ba1a56..ec9dace8 100644
--- a/src/Network/BitTorrent/DHT.hs
+++ b/src/Network/BitTorrent/DHT.hs
@@ -136,6 +136,7 @@ bootstrap startNodes = do
  $(logInfoS) "bootstrap" "Start node bootstrapping"
  nid <- asks thisNodeId
  -- TODO filter duplicated in startNodes list
+  -- TODO retransmissions for startNodes
  aliveNodes <- queryParallel (pingQ <$> startNodes)
  _ <- sourceList [aliveNodes] $= search nid (findNodeQ nid) $$ C.consume
  $(logInfoS) "bootstrap" "Node bootstrapping finished"

diff --git a/src/Network/BitTorrent/DHT.hs b/src/Network/BitTorrent/DHT.hs index 98ba1a56..ec9dace8 100644 --- a/src/Network/BitTorrent/DHT.hs +++ b/src/Network/BitTorrent/DHT.hs
@@ -136,6 +136,7 @@ bootstrap startNodes = do
136	$(logInfoS) "bootstrap" "Start node bootstrapping"	136	$(logInfoS) "bootstrap" "Start node bootstrapping"
137	nid <- asks thisNodeId	137	nid <- asks thisNodeId
138	-- TODO filter duplicated in startNodes list	138	-- TODO filter duplicated in startNodes list
		139	-- TODO retransmissions for startNodes
139	aliveNodes <- queryParallel (pingQ <$> startNodes)	140	aliveNodes <- queryParallel (pingQ <$> startNodes)
140	_ <- sourceList [aliveNodes] $= search nid (findNodeQ nid) $$ C.consume	141	_ <- sourceList [aliveNodes] $= search nid (findNodeQ nid) $$ C.consume
141	$(logInfoS) "bootstrap" "Node bootstrapping finished"	142	$(logInfoS) "bootstrap" "Node bootstrapping finished"