diff options
| author | Joe Crayne <joe@jerkface.net> | 2018-12-16 20:54:30 -0500 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2018-12-16 20:54:36 -0500 |
| commit | 7dcd6ce16ce480791e4207e2c6d554a76fe75d6e (patch) | |
| tree | 92710c3b822c47896df2bfb94fafbba1ef48c55c /src/Network/Tox.hs | |
| parent | 688450c2d9998db7b4389dc9642d219774c23857 (diff) | |
tcp: Avoid ponging on new non-pinged connections.
Diffstat (limited to 'src/Network/Tox.hs')
| -rw-r--r-- | src/Network/Tox.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs index d0304170..c14339e4 100644 --- a/src/Network/Tox.hs +++ b/src/Network/Tox.hs | |||
| @@ -328,7 +328,7 @@ newToxOverTransport keydb addr onNewSession suppliedDHTKey udp tcp = do | |||
| 328 | (orouter,otbl) <- newOnionRouter crypto (dput XRoutes) | 328 | (orouter,otbl) <- newOnionRouter crypto (dput XRoutes) |
| 329 | (cryptonet,dhtcrypt,onioncrypt,dtacrypt,handshakes) | 329 | (cryptonet,dhtcrypt,onioncrypt,dtacrypt,handshakes) |
| 330 | <- toxTransport crypto orouter lookupClose udp | 330 | <- toxTransport crypto orouter lookupClose udp |
| 331 | (sendMessage (clientNet $ tcpClient $ tcpKademliaClient orouter)) | 331 | (\dst x -> sendMessage (clientNet $ tcpClient $ tcpKademliaClient orouter) dst (True,x)) |
| 332 | tcp | 332 | tcp |
| 333 | sessions <- initSessions (sendMessage cryptonet) | 333 | sessions <- initSessions (sendMessage cryptonet) |
| 334 | 334 | ||