diff options
Diffstat (limited to 'dht/examples/dhtd.hs')
-rw-r--r-- | dht/examples/dhtd.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/dht/examples/dhtd.hs b/dht/examples/dhtd.hs index 5bf9296e..f4d04761 100644 --- a/dht/examples/dhtd.hs +++ b/dht/examples/dhtd.hs | |||
@@ -1589,11 +1589,7 @@ initTox runio opts ssvar keysdb mbxmpp invc = case porttox opts of | |||
1589 | -- | 1589 | -- |
1590 | -- > a +dhtkey KWoEx1XQHrluIoW.3nK6BFb6XCebKWr3nDDt3V7CcoJ | 1590 | -- > a +dhtkey KWoEx1XQHrluIoW.3nK6BFb6XCebKWr3nDDt3V7CcoJ |
1591 | , ("dhtkey", DHTAnnouncable { announceSendData = Left ("toxid", readEither, \me them addr -> do | 1591 | , ("dhtkey", DHTAnnouncable { announceSendData = Left ("toxid", readEither, \me them addr -> do |
1592 | -- let mthem = Just ( TCP.tcpClient | 1592 | dkey <- Tox.getContactInfo tox |
1593 | -- $ tcpKademliaClient | ||
1594 | -- $ toxOnionRoutes tox | ||
1595 | -- , them ) | ||
1596 | dkey <- Tox.getContactInfo Nothing tox | ||
1597 | sendMessage | 1593 | sendMessage |
1598 | (Tox.toxToRoute tox) | 1594 | (Tox.toxToRoute tox) |
1599 | (Tox.AnnouncedRendezvous them addr) | 1595 | (Tox.AnnouncedRendezvous them addr) |