dandri/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2026-05-27 11:53:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

core: rename CRGroupData constructor to CRDataGroup (#1299)

Browse Source
This commit is contained in:
JRoberts
2022-11-05 15:04:39 +04:00
committed by GitHub
parent 687a741723
commit 80ca80f6d8
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/Types.hs
+4 -4
View File
@@ -571,15 +571,15 @@ instance ToField ImageData where toField (ImageData t) = toField t
instance FromField ImageData where fromField = fmap ImageData . fromField
data CReqClientData = CRGroupData {groupLinkId :: GroupLinkId}
data CReqClientData = CRDataGroup {groupLinkId :: GroupLinkId}
deriving (Generic)
instance ToJSON CReqClientData where
toJSON = J.genericToJSON . taggedObjectJSON $ dropPrefix "CR"
toEncoding = J.genericToEncoding . taggedObjectJSON $ dropPrefix "CR"
toJSON = J.genericToJSON . taggedObjectJSON $ dropPrefix "CRData"
toEncoding = J.genericToEncoding . taggedObjectJSON $ dropPrefix "CRData"
instance FromJSON CReqClientData where
parseJSON = J.genericParseJSON . taggedObjectJSON $ dropPrefix "CR"
parseJSON = J.genericParseJSON . taggedObjectJSON $ dropPrefix "CRData"
newtype GroupLinkId = GroupLinkId {unGroupLinkId :: ByteString} -- used to identify invitation via group link
deriving (Eq, Show)