1 files changed, 2 insertions, 1 deletions

diff --git a/examples/dhtd.hs b/examples/dhtd.hs
index 6dbc1120..52ff3c98 100644
--- a/examples/dhtd.hs
+++ b/examples/dhtd.hs
@@ -229,7 +229,8 @@ instance Kademlia Tox.Message where
     nameFindNodes _ = Tox.GetNodes
     initializeDHTData = return ToxData
 
-instance Pretty (NodeId Tox.Message) where
+instance Pretty (NodeId Tox.Message) where pPrint (Tox.NodeId nid) = encodeHexDoc nid
+
 instance Pretty (NodeInfo Tox.Message IPv4 ()) where
 instance Pretty (NodeInfo Tox.Message IPv4 Bool) where -- TODO
 instance Read (NodeId KMessageOf) where