1 files changed, 1 insertions, 1 deletions

diff --git a/dht/src/Data/Tox/Msg.hs b/dht/src/Data/Tox/Msg.hs
index 8819faa7..2951193d 100644
--- a/dht/src/Data/Tox/Msg.hs
+++ b/dht/src/Data/Tox/Msg.hs
@@ -260,7 +260,7 @@ instance Read ChatID where
         | otherwise = []
 
 instance Show ChatID where
-    show (ChatID ed) = showToken32 ed
+    show (ChatID ed) = show64Token32 ed
 
 data InviteType = GroupInvite { groupName :: Text }
                 | AcceptedInvite