NetCrypto wip, compiles

1 files changed, 2 insertions, 2 deletions

diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs
index 87835769..2f778874 100644
--- a/src/Network/Tox.hs
+++ b/src/Network/Tox.hs
@@ -89,7 +89,7 @@ import Crypto.Tox
 import Data.Word64Map                        (fitsInInt)
 import qualified Data.Word64Map              (empty)
 import Network.Tox.Crypto.Transport          (NetCrypto)
-import Network.Tox.Crypto.Handlers           (newSessionsState, cryptoNetHandler)
+import Network.Tox.Crypto.Handlers           (newSessionsState, cryptoNetHandler, cryptoDefaultHooks)
 import qualified Network.Tox.DHT.Handlers    as DHT
 import qualified Network.Tox.DHT.Transport   as DHT
 import Network.Tox.NodeId
@@ -309,7 +309,7 @@ newTox keydb addr = do
                     (const id)
 
     roster <- newRoster
-    sessionsState <- newSessionsState crypto
+    sessionsState <- newSessionsState crypto cryptoDefaultHooks
     return Tox
         { toxDHT = dhtclient
         , toxOnion = onionclient