summaryrefslogtreecommitdiff
path: root/src/Network
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network')
-rw-r--r--src/Network/Tox.hs1
-rw-r--r--src/Network/Tox/Crypto/Handlers.hs1
2 files changed, 2 insertions, 0 deletions
diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs
index 3324c934..4d244199 100644
--- a/src/Network/Tox.hs
+++ b/src/Network/Tox.hs
@@ -492,6 +492,7 @@ newTox keydb addr mbSessionsState suppliedDHTKey = do
492 , toxOnionRoutes = orouter 492 , toxOnionRoutes = orouter
493 , toxContactInfo = roster 493 , toxContactInfo = roster
494 , toxAnnounceToLan = announceToLan sock (key2id $ transportPublic crypto) 494 , toxAnnounceToLan = announceToLan sock (key2id $ transportPublic crypto)
495 , toxMgr = mgr
495 } 496 }
496 497
497onionTimeout :: Tox -> DHT.TransactionId -> Onion.OnionDestination RouteId -> STM (Onion.OnionDestination RouteId, Int) 498onionTimeout :: Tox -> DHT.TransactionId -> Onion.OnionDestination RouteId -> STM (Onion.OnionDestination RouteId, Int)
diff --git a/src/Network/Tox/Crypto/Handlers.hs b/src/Network/Tox/Crypto/Handlers.hs
index 61b2ab3c..1acc333e 100644
--- a/src/Network/Tox/Crypto/Handlers.hs
+++ b/src/Network/Tox/Crypto/Handlers.hs
@@ -57,6 +57,7 @@ import Text.Printf
57import Data.Bool 57import Data.Bool
58import Connection (Status(..), Policy(..)) 58import Connection (Status(..), Policy(..))
59import Connection.Tox.Threads (ToxProgress(..)) 59import Connection.Tox.Threads (ToxProgress(..))
60import Network.Tox.ContactInfo
60 61
61type LookupPolicyFunction = Key -> STM Policy 62type LookupPolicyFunction = Key -> STM Policy
62 63