diff options
Diffstat (limited to 'Connection/Tox.hs')
-rw-r--r-- | Connection/Tox.hs | 6 |
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 | |||
9 | import Data.Functor.Identity | 9 | import Data.Functor.Identity |
10 | import qualified Data.Map as Map | 10 | import qualified Data.Map as Map |
11 | -- import Data.Maybe | 11 | -- import Data.Maybe |
12 | import Network.Tox | 12 | -- import Network.Tox |
13 | import Network.Tox.NodeId | 13 | import Network.Tox.NodeId |
14 | import PingMachine | 14 | import PingMachine |
15 | import Text.Read | 15 | import Text.Read |
@@ -80,10 +80,10 @@ data ToxProgress | |||
80 | 80 | ||
81 | data Parameters = Parameters | 81 | data Parameters = Parameters |
82 | { -- | Various Tox transports and clients. | 82 | { -- | Various Tox transports and clients. |
83 | toxTransports :: Tox | 83 | -- toxTransports :: Tox |
84 | -- | Thread to be forked when a connection is established. | 84 | -- | Thread to be forked when a connection is established. |
85 | -- TODO: this function should accept relevant parameters. | 85 | -- TODO: this function should accept relevant parameters. |
86 | , onToxSession :: IO () | 86 | onToxSession :: IO () |
87 | } | 87 | } |
88 | 88 | ||
89 | data Key = Key NodeId{-me-} NodeId{-them-} | 89 | data Key = Key NodeId{-me-} NodeId{-them-} |