fix type

2026-08-27 18:02:10 +00:00 · 2026-08-02 16:47:53 +01:00
parent f444a2890e
commit ec4d8ca176
4 changed files with 11 additions and 7 deletions
@@ -1150,7 +1150,11 @@ data ReceivedGroupInvitation = ReceivedGroupInvitation

 type GroupMemberId = Int64

-data KeySendStatus = KSSent | KSFailed | KSError Text | KSAttempts Int
+data KeySendStatus
+  = KSSent
+  | KSFailed
+  | KSError {sendError :: Text}
+  | KSAttempts {sendAttempts :: Int}
  deriving (Eq, Show)

 -- memberProfile's profileId is COALESCE(member_profile_id, contact_profile_id), member_profile_id is non null