remove type

This commit is contained in:
spaced4ndy
2023-12-21 11:39:44 +04:00
parent 106916fd29
commit e9868390ce
-6
View File
@@ -766,12 +766,6 @@ checkChatType x = case testEquality (chatTypeI @c) (chatTypeI @c') of
type LazyMsgBody = L.ByteString
data NewSndMessage e = NewSndMessage
{ chatMsgEvent :: ChatMsgEvent e,
msgBody :: LazyMsgBody
}
deriving (Show)
data SndMessage = SndMessage
{ msgId :: MessageId,
sharedMsgId :: SharedMsgId,