summaryrefslogtreecommitdiff
path: root/src/Network/Tox/Onion/Handlers.hs
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2017-10-21 04:18:22 -0400
committerjoe <joe@jerkface.net>2017-10-21 04:18:22 -0400
commite508e05ae839091a109f3c253dcfeadb6f40982d (patch)
treea966e783fbcdab693912a809321c3654c8f4f848 /src/Network/Tox/Onion/Handlers.hs
parent236a71b57d25b4061d1fd20d0930407c340cc6d9 (diff)
Made queries to the same node go by the same route.
Diffstat (limited to 'src/Network/Tox/Onion/Handlers.hs')
-rw-r--r--src/Network/Tox/Onion/Handlers.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Network/Tox/Onion/Handlers.hs b/src/Network/Tox/Onion/Handlers.hs
index 047b902d..dc7817db 100644
--- a/src/Network/Tox/Onion/Handlers.hs
+++ b/src/Network/Tox/Onion/Handlers.hs
@@ -173,6 +173,10 @@ toxidSearch getTimeout client = Search
173 { searchSpace = toxSpace 173 { searchSpace = toxSpace
174 , searchNodeAddress = nodeIP &&& nodePort 174 , searchNodeAddress = nodeIP &&& nodePort
175 , searchQuery = getRendezvous getTimeout client 175 , searchQuery = getRendezvous getTimeout client
176 -- TODO: We're using SearchingAlias for all searches. When searching
177 -- for nodes to announce at, we should probably use AnnouncingAlias so
178 -- that the token pingid resulting from the search can be used to
179 -- announce.
176 } 180 }
177 181
178announceSerializer :: (TransactionId -> OnionDestination r -> STM (OnionDestination r, Int)) 182announceSerializer :: (TransactionId -> OnionDestination r -> STM (OnionDestination r, Int))