diff options
Diffstat (limited to 'dht/src/Network/Tox/TCP.hs')
-rw-r--r-- | dht/src/Network/Tox/TCP.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dht/src/Network/Tox/TCP.hs b/dht/src/Network/Tox/TCP.hs index ca4ca817..5dfb8382 100644 --- a/dht/src/Network/Tox/TCP.hs +++ b/dht/src/Network/Tox/TCP.hs | |||
@@ -233,7 +233,7 @@ getUDPNodes' tcp seeking dst0 = do | |||
233 | , method = OnionPacketID -- meth | 233 | , method = OnionPacketID -- meth |
234 | , wrapQuery = \n8 src gateway x -> (,) True $ | 234 | , wrapQuery = \n8 src gateway x -> (,) True $ |
235 | OnionPacket n24 $ Addressed (UDP.nodeAddr dst) | 235 | OnionPacket n24 $ Addressed (UDP.nodeAddr dst) |
236 | $ wrapOnionPure b (wrap2 n24) (nodeAddr gateway') | 236 | $ wrapOnionPure b (wrap2 n24) (UDP.nodeAddr $ udpNodeInfo gateway') |
237 | $ wrapOnionPure c (wrap1 n24) (UDP.nodeAddr dst) | 237 | $ wrapOnionPure c (wrap1 n24) (UDP.nodeAddr dst) |
238 | $ NotForwarded $ encryptPayload (wrap0 n24) | 238 | $ NotForwarded $ encryptPayload (wrap0 n24) |
239 | $ OnionAnnounce Asymm | 239 | $ OnionAnnounce Asymm |