summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/MainlineDHT.hs
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2018-12-16 13:51:02 -0500
committerJoe Crayne <joe@jerkface.net>2018-12-16 14:08:27 -0500
commit688450c2d9998db7b4389dc9642d219774c23857 (patch)
tree69933330ad0baba2eb115d70d1e63cb085664ea1 /src/Network/BitTorrent/MainlineDHT.hs
parent8a72757ae66f6ec013b8f3443aea6f3266a2ab26 (diff)
More TCP work.
Diffstat (limited to 'src/Network/BitTorrent/MainlineDHT.hs')
-rw-r--r--src/Network/BitTorrent/MainlineDHT.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Network/BitTorrent/MainlineDHT.hs b/src/Network/BitTorrent/MainlineDHT.hs
index a29657af..6f47e38f 100644
--- a/src/Network/BitTorrent/MainlineDHT.hs
+++ b/src/Network/BitTorrent/MainlineDHT.hs
@@ -1076,6 +1076,8 @@ mainlineSearch qry = Search
1076 { searchSpace = mainlineSpace 1076 { searchSpace = mainlineSpace
1077 , searchNodeAddress = nodeIP &&& nodePort 1077 , searchNodeAddress = nodeIP &&& nodePort
1078 , searchQuery = qry 1078 , searchQuery = qry
1079 , searchAlpha = 8
1080 , searchK = 16
1079 } 1081 }
1080 1082
1081nodeSearch :: MainlineClient -> Search NodeId (IP, PortNumber) () NodeInfo NodeInfo 1083nodeSearch :: MainlineClient -> Search NodeId (IP, PortNumber) () NodeInfo NodeInfo