summaryrefslogtreecommitdiff
path: root/dht/src/Data/Tox
diff options
context:
space:
mode:
Diffstat (limited to 'dht/src/Data/Tox')
-rw-r--r--dht/src/Data/Tox/Onion.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/dht/src/Data/Tox/Onion.hs b/dht/src/Data/Tox/Onion.hs
index e0d7c744..e19f71b6 100644
--- a/dht/src/Data/Tox/Onion.hs
+++ b/dht/src/Data/Tox/Onion.hs
@@ -198,7 +198,7 @@ parseOnionAddr lookupSender (msg,saddr)
198 (return . Left . \od -> (msg,od)) 198 (return . Left . \od -> (msg,od))
199 maddr 199 maddr
200 Just (Right msg@(OnionToRouteResponse asym)) -> do 200 Just (Right msg@(OnionToRouteResponse asym)) -> do
201 let ni = asymNodeInfo saddr asym 201 let ni = asymNodeInfo nodeInfo saddr asym
202 return $ Left (msg, OnionDestination SearchingAlias ni Nothing) 202 return $ Left (msg, OnionDestination SearchingAlias ni Nothing)
203 _ -> return right 203 _ -> return right
204 204