Debugged encodeDataToRoute/parseDataToRoute.

1 files changed, 3 insertions, 0 deletions

diff --git a/src/Network/Tox/DHT/Transport.hs b/src/Network/Tox/DHT/Transport.hs
index 0787c2c1..47505a21 100644
--- a/src/Network/Tox/DHT/Transport.hs
+++ b/src/Network/Tox/DHT/Transport.hs
@@ -210,6 +210,8 @@ data DHTPublicKey = DHTPublicKey
     , dhtpk      :: PublicKey -- dht public key
     , dhtpkNodes :: SendNodes -- other reachable nodes
     }
+ deriving (Eq, Show)
+
 
 -- int8_t (0x20 sent over onion, 0x12 for sent over net_crypto)
 -- [uint32_t nospam][Message (UTF8) 1 to ONION_CLIENT_MAX_DATA_SIZE bytes]
@@ -217,6 +219,7 @@ data FriendRequest = FriendRequest
     { friendNoSpam      :: Word32
     , friendRequestText :: ByteString -- UTF8
     }
+ deriving (Eq, Show)
 
 -- When sent as a DHT request packet (this is the data sent in the DHT request
 -- packet):