This patch:

        *  integrates Connection.Tox and Network.Tox.Crypto.Handlers
        *  Network.Tox.netCrypto function uses freshCryptoSession

1 files changed, 3 insertions, 3 deletions

diff --git a/Connection/Tox.hs b/Connection/Tox.hs
index 00d15aa7..1d133628 100644
--- a/Connection/Tox.hs
+++ b/Connection/Tox.hs
@@ -9,7 +9,7 @@ import Data.Dependent.Sum
 import Data.Functor.Identity
 import qualified Data.Map     as Map
 -- import Data.Maybe
-import Network.Tox
+-- import Network.Tox
 import Network.Tox.NodeId
 import PingMachine
 import Text.Read
@@ -80,10 +80,10 @@ data ToxProgress
 
 data Parameters = Parameters
     { -- | Various Tox transports and clients.
-      toxTransports :: Tox
+      -- toxTransports :: Tox
       -- | Thread to be forked when a connection is established.
       -- TODO: this function should accept relevant parameters.
-    , onToxSession  :: IO ()
+     onToxSession  :: IO ()
     }
 
 data Key = Key NodeId{-me-} NodeId{-them-}