summaryrefslogtreecommitdiff
path: root/dht/TCPProber.hs
diff options
context:
space:
mode:
Diffstat (limited to 'dht/TCPProber.hs')
-rw-r--r--dht/TCPProber.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/dht/TCPProber.hs b/dht/TCPProber.hs
index d58b8b60..faf8b35c 100644
--- a/dht/TCPProber.hs
+++ b/dht/TCPProber.hs
@@ -177,7 +177,7 @@ nodeSearch :: TCPProber -> TCP.TCPClient err Nonce8 -> Search NodeId (IP, PortNu
177nodeSearch prober tcp = Search 177nodeSearch prober tcp = Search
178 { searchSpace = TCP.tcpSpace 178 { searchSpace = TCP.tcpSpace
179 , searchNodeAddress = TCP.nodeIP &&& TCP.tcpPort 179 , searchNodeAddress = TCP.nodeIP &&& TCP.tcpPort
180 , searchQuery = Left $ getNodes prober tcp 180 , searchQuery = getNodes prober tcp
181 , searchAlpha = 8 181 , searchAlpha = 8
182 , searchK = 16 182 , searchK = 16
183 } 183 }