summaryrefslogtreecommitdiff
path: root/src/Network/Tox
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/Tox')
-rw-r--r--src/Network/Tox/DHT/Handlers.hs3
-rw-r--r--src/Network/Tox/Onion/Transport.hs1
-rw-r--r--src/Network/Tox/Relay.hs1
3 files changed, 1 insertions, 4 deletions
diff --git a/src/Network/Tox/DHT/Handlers.hs b/src/Network/Tox/DHT/Handlers.hs
index d7f05dbc..2062b51d 100644
--- a/src/Network/Tox/DHT/Handlers.hs
+++ b/src/Network/Tox/DHT/Handlers.hs
@@ -340,9 +340,6 @@ unpong :: Message -> Maybe (Asymm (Nonce8,Pong))
340unpong (DHTPong asymm) = Just asymm 340unpong (DHTPong asymm) = Just asymm
341unpong _ = Nothing 341unpong _ = Nothing
342 342
343showHex :: BA.ByteArrayAccess ba => ba -> String
344showHex bs = C8.unpack $ Base16.encode $ BA.convert bs
345
346ping :: Client -> NodeInfo -> IO Bool 343ping :: Client -> NodeInfo -> IO Bool
347ping client addr = do 344ping client addr = do
348 dput XPing $ show addr ++ " <-- ping" 345 dput XPing $ show addr ++ " <-- ping"
diff --git a/src/Network/Tox/Onion/Transport.hs b/src/Network/Tox/Onion/Transport.hs
index f6d9ca31..3d8a9e93 100644
--- a/src/Network/Tox/Onion/Transport.hs
+++ b/src/Network/Tox/Onion/Transport.hs
@@ -51,6 +51,7 @@ module Network.Tox.Onion.Transport
51 , RouteId(..) 51 , RouteId(..)
52 , routeId 52 , routeId
53 , rewrap 53 , rewrap
54 , putRequest
54 ) where 55 ) where
55 56
56import Network.Address (fromSockAddr,toSockAddr,setPort,either4or6,sockAddrPort) 57import Network.Address (fromSockAddr,toSockAddr,setPort,either4or6,sockAddrPort)
diff --git a/src/Network/Tox/Relay.hs b/src/Network/Tox/Relay.hs
index 17bbc379..7af14ed6 100644
--- a/src/Network/Tox/Relay.hs
+++ b/src/Network/Tox/Relay.hs
@@ -28,7 +28,6 @@ import Data.Tox.Relay
28import Network.Address (getBindAddress) 28import Network.Address (getBindAddress)
29import Network.SocketLike 29import Network.SocketLike
30import Network.StreamServer 30import Network.StreamServer
31import Network.Tox (newCrypto)
32import Network.Tox.Onion.Transport hiding (encrypt,decrypt) 31import Network.Tox.Onion.Transport hiding (encrypt,decrypt)
33 32
34 33