From c7adc4afe5908753627d42386463604ce634de62 Mon Sep 17 00:00:00 2001 From: James Crayne Date: Wed, 30 May 2018 00:43:09 +0000 Subject: Finish "session" and "netcrypto" todo stubs --- src/Network/Tox/Crypto/Transport.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Network/Tox/Crypto/Transport.hs') diff --git a/src/Network/Tox/Crypto/Transport.hs b/src/Network/Tox/Crypto/Transport.hs index 40288502..141ef792 100644 --- a/src/Network/Tox/Crypto/Transport.hs +++ b/src/Network/Tox/Crypto/Transport.hs @@ -204,9 +204,9 @@ instance Serialize CryptoData where -- -- The Enum instance on 'UserStatus' is not arbitrary. It corresponds -- to on-the-wire id numbers. -data UserStatus = Online | Away | Busy deriving (Show,Eq,Ord,Enum) +data UserStatus = Online | Away | Busy deriving (Show,Read,Eq,Ord,Enum) -data TypingStatus = NotTyping | Typing deriving (Show,Eq,Ord,Enum) +data TypingStatus = NotTyping | Typing deriving (Show,Read,Eq,Ord,Enum) data CryptoMessage = OneByte { msgID :: MessageID } -- cgit v1.2.3