diff options
| author | joe <joe@jerkface.net> | 2018-06-20 23:30:47 -0400 |
|---|---|---|
| committer | joe <joe@jerkface.net> | 2018-06-20 23:30:47 -0400 |
| commit | cd3095fe7e9a5a74a0fea7c8bfcd9e92ce20f8a0 (patch) | |
| tree | 8589ede4fe96b757ec1d8d394f807dad278cea9a /src/Network/Tox.hs | |
| parent | 825962518c6ad00279fc23e8e1dec746980e483f (diff) | |
XRoutes debug tag, clearer "k secrets" output, missing signature.
Diffstat (limited to 'src/Network/Tox.hs')
| -rw-r--r-- | src/Network/Tox.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs index efddc2a0..fcfa872f 100644 --- a/src/Network/Tox.hs +++ b/src/Network/Tox.hs | |||
| @@ -445,8 +445,7 @@ newTox keydb addr mbSessionsState suppliedDHTKey = do | |||
| 445 | let lookupClose _ = return Nothing | 445 | let lookupClose _ = return Nothing |
| 446 | 446 | ||
| 447 | mkrouting <- DHT.newRouting addr crypto updateIP updateIP | 447 | mkrouting <- DHT.newRouting addr crypto updateIP updateIP |
| 448 | let ignoreErrors _ = return () -- Set this to (dput XMisc) to debug onion route building. | 448 | orouter <- newOnionRouter $ dput XRoutes |
| 449 | orouter <- newOnionRouter ignoreErrors | ||
| 450 | (cryptonet,dhtcrypt,onioncrypt,dtacrypt,handshakes) <- toxTransport crypto orouter lookupClose udp | 449 | (cryptonet,dhtcrypt,onioncrypt,dtacrypt,handshakes) <- toxTransport crypto orouter lookupClose udp |
| 451 | 450 | ||
| 452 | let dhtnet0 = layerTransportM (DHT.decrypt crypto) (DHT.encrypt crypto) dhtcrypt | 451 | let dhtnet0 = layerTransportM (DHT.decrypt crypto) (DHT.encrypt crypto) dhtcrypt |