diff options
Diffstat (limited to 'dht/src/Data/Tox')
-rw-r--r-- | dht/src/Data/Tox/Onion.hs | 2 |
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 | ||