diff options
author | joe <joe@jerkface.net> | 2018-06-24 13:39:56 -0400 |
---|---|---|
committer | joe <joe@jerkface.net> | 2018-06-24 13:39:56 -0400 |
commit | 80d2a23f5910bd46f7848185e6a502b04bb1dec0 (patch) | |
tree | bb484e171c57a7baa5b08a3ea0ff74a267818596 /src/Network/Tox | |
parent | 9f30ec540c49fc2ea4e05a87b3253937a868c721 (diff) |
Redundant imports.
Diffstat (limited to 'src/Network/Tox')
-rw-r--r-- | src/Network/Tox/ContactInfo.hs | 1 | ||||
-rw-r--r-- | src/Network/Tox/Crypto/Transport.hs | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/src/Network/Tox/ContactInfo.hs b/src/Network/Tox/ContactInfo.hs index 1970b782..5f144057 100644 --- a/src/Network/Tox/ContactInfo.hs +++ b/src/Network/Tox/ContactInfo.hs | |||
@@ -11,7 +11,6 @@ import Crypto.PubKey.Curve25519 | |||
11 | import qualified Data.HashMap.Strict as HashMap | 11 | import qualified Data.HashMap.Strict as HashMap |
12 | ;import Data.HashMap.Strict (HashMap) | 12 | ;import Data.HashMap.Strict (HashMap) |
13 | import Data.Maybe | 13 | import Data.Maybe |
14 | import Network.Socket | ||
15 | import Network.Tox.DHT.Transport as DHT | 14 | import Network.Tox.DHT.Transport as DHT |
16 | import Network.Tox.NodeId (id2key) | 15 | import Network.Tox.NodeId (id2key) |
17 | import Network.Tox.Onion.Transport as Onion | 16 | import Network.Tox.Onion.Transport as Onion |
diff --git a/src/Network/Tox/Crypto/Transport.hs b/src/Network/Tox/Crypto/Transport.hs index 54d96c34..c7fbfdc6 100644 --- a/src/Network/Tox/Crypto/Transport.hs +++ b/src/Network/Tox/Crypto/Transport.hs | |||
@@ -80,7 +80,6 @@ import Data.Serialize as S | |||
80 | import Control.Arrow | 80 | import Control.Arrow |
81 | import DPut | 81 | import DPut |
82 | import Data.PacketQueue (toPNums) | 82 | import Data.PacketQueue (toPNums) |
83 | import Data.List | ||
84 | 83 | ||
85 | showCryptoMsg :: Word32 -> CryptoMessage -> [Char] | 84 | showCryptoMsg :: Word32 -> CryptoMessage -> [Char] |
86 | showCryptoMsg seqno (UpToN PacketRequest bytes) = "UpToN PacketRequest --> " ++ show (toPNums seqno $ B.unpack bytes) | 85 | showCryptoMsg seqno (UpToN PacketRequest bytes) = "UpToN PacketRequest --> " ++ show (toPNums seqno $ B.unpack bytes) |