Schedule TCP chat-link session attempts.

1 files changed, 2 insertions, 2 deletions

diff --git a/dht/src/Network/Tox/TCP.hs b/dht/src/Network/Tox/TCP.hs
index dc4c9967..c4727a20 100644
--- a/dht/src/Network/Tox/TCP.hs
+++ b/dht/src/Network/Tox/TCP.hs
@@ -292,9 +292,9 @@ tcpPing client dst = do
                 , method         = PingPacket
                 }
 
-tcpConnectionRequest :: Client err PacketNumber tid addr (Bool, RelayPacket)
+tcpConnectionRequest_ :: Client err PacketNumber tid addr (Bool, RelayPacket)
                         -> PublicKey -> addr -> IO (Maybe ConId)
-tcpConnectionRequest client pubkey ni = do
+tcpConnectionRequest_ client pubkey ni = do
     sendQuery client meth pubkey ni
  where
     meth = MethodSerializer