Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add optional subconversation field to conversation events #2933

Merged
merged 3 commits into from
Dec 19, 2022
Merged

Add optional subconversation field to conversation events #2933

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
169758d
Add optional subconversation field to Conv Event
smatting Dec 16, 2022
b7974b2
Add changelog entry
smatting Dec 16, 2022
a895a31
Add golden test for event with populated "subconv" field
smatting Dec 19, 2022
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions changelog.d/1-api-changes/subconv-field
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1 @@
Conversation events may have a "subconv" field for events that originate in a MLS subconversation
6 changes: 4 additions & 2 deletions libs/wire-api/src/Wire/API/Conversation/Action.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -47,6 +47,7 @@ import Wire.API.Conversation
import Wire.API.Conversation.Action.Tag
import Wire.API.Conversation.Role
import Wire.API.Event.Conversation
import Wire.API.MLS.SubConversation
import Wire.Arbitrary (Arbitrary (..))

-- | We use this type family instead of a sum type to be able to define
Expand Down Expand Up @@ -143,9 +144,10 @@ conversationActionToEvent ::
UTCTime ->
Qualified UserId ->
Qualified ConvId ->
Maybe SubConvId ->
ConversationAction tag ->
Event
conversationActionToEvent tag now quid qcnv action =
conversationActionToEvent tag now quid qcnv subconv action =
let edata = case tag of
SConversationJoinTag ->
let ConversationJoin newMembers role = action
Expand All @@ -163,4 +165,4 @@ conversationActionToEvent tag now quid qcnv action =
SConversationMessageTimerUpdateTag -> EdConvMessageTimerUpdate action
SConversationReceiptModeUpdateTag -> EdConvReceiptModeUpdate action
SConversationAccessDataTag -> EdConvAccessUpdate action
in Event qcnv quid now edata
in Event qcnv subconv quid now edata
6 changes: 5 additions & 1 deletion libs/wire-api/src/Wire/API/Event/Conversation.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -83,6 +83,7 @@ import Wire.API.Conversation
import Wire.API.Conversation.Code (ConversationCode (..))
import Wire.API.Conversation.Role
import Wire.API.Conversation.Typing
import Wire.API.MLS.SubConversation
import Wire.API.Routes.MultiVerb
import Wire.API.Routes.Version
import Wire.API.User (QualifiedUserIdList (..))
Expand All @@ -93,6 +94,7 @@ import Wire.Arbitrary (Arbitrary (arbitrary), GenericUniform (..))

data Event = Event
{ evtConv :: Qualified ConvId,
evtSubConv :: Maybe SubConvId,
evtFrom :: Qualified UserId,
evtTime :: UTCTime,
evtData :: EventData
Expand All @@ -108,6 +110,7 @@ instance Arbitrary Event where
Event
<$> arbitrary
<*> arbitrary
<*> arbitrary
<*> (milli <$> arbitrary)
<*> genEventData typ
where
Expand Down Expand Up @@ -401,11 +404,12 @@ eventObjectSchema =
<$> (evtType &&& evtData) .= taggedEventDataSchema
<* (qUnqualified . evtConv) .= optional (field "conversation" schema)
<*> evtConv .= field "qualified_conversation" schema
<*> evtSubConv .= maybe_ (optField "subconv" schema)
<* (qUnqualified . evtFrom) .= optional (field "from" schema)
<*> evtFrom .= field "qualified_from" schema
<*> (toUTCTimeMillis . evtTime) .= field "time" (fromUTCTimeMillis <$> schema)
where
mk (_, d) cid uid tm = Event cid uid tm d
mk (_, d) cid sconvid uid tm = Event cid sconvid uid tm d

instance ToJSONObject Event where
toJSONObject =
Expand Down
2 changes: 2 additions & 0 deletions libs/wire-api/test/golden/Test/Wire/API/Golden/Generated/AddBotResponse_user.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -53,6 +53,7 @@ testObject_AddBotResponse_user_1 =
rsAddBotEvent =
Event
(Qualified (Id (fromJust (UUID.fromString "00000001-0000-0000-0000-000200000003"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00000004-0000-0004-0000-000400000004"))) (Domain "faraway.example.com"))
(read "1864-05-12 19:20:22.286 UTC")
(EdConvRename (ConversationRename {cupName = "6"}))
Expand All @@ -73,6 +74,7 @@ testObject_AddBotResponse_user_2 =
rsAddBotEvent =
Event
(Qualified (Id (fromJust (UUID.fromString "00000000-0000-0002-0000-000300000001"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00000004-0000-0000-0000-000300000001"))) (Domain "faraway.example.com"))
(read "1864-05-08 19:02:58.6 UTC")
(EdTyping StartedTyping)
Expand Down
11 changes: 11 additions & 0 deletions libs/wire-api/test/golden/Test/Wire/API/Golden/Generated/Event_conversation.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -39,6 +39,7 @@ testObject_Event_conversation_1 :: Event
testObject_Event_conversation_1 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "oym59-06.i423w"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "n8nl6tp.h5"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdConvCodeDelete
Expand All @@ -48,6 +49,7 @@ testObject_Event_conversation_2 :: Event
testObject_Event_conversation_2 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "2m99----34.id7u09"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "b.0-7.0.rg"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData =
Expand All @@ -69,6 +71,7 @@ testObject_Event_conversation_3 :: Event
testObject_Event_conversation_3 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "91.ii9vf.mbwj9k7lmk"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "k3.f.z"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData =
Expand All @@ -85,6 +88,7 @@ testObject_Event_conversation_4 :: Event
testObject_Event_conversation_4 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "ma--6us.i8o--0440"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "97k-u0.b-5c"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdConvAccessUpdate (ConversationAccessData {cupAccess = fromList [PrivateAccess, CodeAccess], cupAccessRoles = fromList []})
Expand All @@ -94,6 +98,7 @@ testObject_Event_conversation_5 :: Event
testObject_Event_conversation_5 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "q.6lm833.o95.l.y2"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "7.m4f7p.ez4zs61"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdMLSWelcome ""
Expand All @@ -103,6 +108,7 @@ testObject_Event_conversation_6 :: Event
testObject_Event_conversation_6 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "391.r"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "8.0-6.t7pxv"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdOtrMessage (OtrMessage {otrSender = ClientId {client = "1"}, otrRecipient = ClientId {client = "1"}, otrCiphertext = "", otrData = Just "I\68655"})
Expand All @@ -112,6 +118,7 @@ testObject_Event_conversation_7 :: Event
testObject_Event_conversation_7 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "b2.ue4k"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "64b3--h.u"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdOtrMessage (OtrMessage {otrSender = ClientId {client = "3"}, otrRecipient = ClientId {client = "3"}, otrCiphertext = "%\SI", otrData = Nothing})
Expand All @@ -121,6 +128,7 @@ testObject_Event_conversation_8 :: Event
testObject_Event_conversation_8 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "36.e9.s-o-17"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "0--gy.705nsa8.j4m"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdTyping StartedTyping
Expand All @@ -130,6 +138,7 @@ testObject_Event_conversation_9 :: Event
testObject_Event_conversation_9 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "743846p6-pp33.1.ktb9.0bmn.efm2bly"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "9--5grmn.j39y3--9n"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData =
Expand Down Expand Up @@ -163,6 +172,7 @@ testObject_Event_conversation_10 :: Event
testObject_Event_conversation_10 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "1852a.o-4"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "4-p.d7b8d3.6.c8--jds3-1acy"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdMLSMessage "s\b\138w\236\231P(\ESC\216\205"
Expand All @@ -172,6 +182,7 @@ testObject_Event_conversation_11 :: Event
testObject_Event_conversation_11 =
Event
{ evtConv = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "wwzw-ly4jk5.6790-y.j04o-21.ltl"}},
evtSubConv = Nothing,
evtFrom = Qualified {qUnqualified = Id (fromJust (UUID.fromString "2126ea99-ca79-43ea-ad99-a59616468e8e")), qDomain = Domain {_domainText = "70-o.ncd"}},
evtTime = UTCTime {utctDay = ModifiedJulianDay 58119, utctDayTime = 0},
evtData = EdTyping StoppedTyping
Expand Down
16 changes: 16 additions & 0 deletions libs/wire-api/test/golden/Test/Wire/API/Golden/Generated/Event_user.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -43,6 +43,7 @@ testObject_Event_user_1 :: Event
testObject_Event_user_1 =
Event
(Qualified (Id (fromJust (UUID.fromString "00005d81-0000-0d71-0000-1d8f00007d32"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00003b8b-0000-3395-0000-076a00007830"))) (Domain "faraway.example.com"))
(read "1864-05-22 09:51:07.104 UTC")
EdConvDelete
Expand All @@ -51,6 +52,7 @@ testObject_Event_user_2 :: Event
testObject_Event_user_2 =
Event
(Qualified (Id (fromJust (UUID.fromString "0000064d-0000-7a7f-0000-5749000029e1"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00006a88-0000-2acb-0000-6aa0000061b2"))) (Domain "faraway.example.com"))
(read "1864-06-05 23:01:18.769 UTC")
( EdConvAccessUpdate
Expand All @@ -65,6 +67,7 @@ testObject_Event_user_3 :: Event
testObject_Event_user_3 =
Event
(Qualified (Id (fromJust (UUID.fromString "00006f8c-0000-00d6-0000-1568000001e9"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00004b11-0000-5504-0000-55d800002188"))) (Domain "faraway.example.com"))
(read "1864-04-27 15:44:23.844 UTC")
( EdOtrMessage
Expand All @@ -81,6 +84,7 @@ testObject_Event_user_4 :: Event
testObject_Event_user_4 =
Event
(Qualified (Id (fromJust (UUID.fromString "00004f04-0000-3939-0000-472d0000316b"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00007c90-0000-766a-0000-01b700002ab7"))) (Domain "faraway.example.com"))
(read "1864-05-12 00:59:09.2 UTC")
EdConvCodeDelete
Expand All @@ -89,6 +93,7 @@ testObject_Event_user_5 :: Event
testObject_Event_user_5 =
Event
(Qualified (Id (fromJust (UUID.fromString "00003c8c-0000-6394-0000-294b0000098b"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00002a12-0000-73e1-0000-71f700002ec9"))) (Domain "faraway.example.com"))
(read "1864-04-12 03:04:00.298 UTC")
( EdMemberUpdate
Expand Down Expand Up @@ -116,6 +121,7 @@ testObject_Event_user_6 :: Event
testObject_Event_user_6 =
Event
(Qualified (Id (fromJust (UUID.fromString "00001fdb-0000-3127-0000-23ef00007183"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "0000705a-0000-0b62-0000-425c000049c8"))) (Domain "faraway.example.com"))
(read "1864-05-09 05:44:41.382 UTC")
(EdConvMessageTimerUpdate (ConversationMessageTimerUpdate {cupMessageTimer = Just (Ms {ms = 5029817038083912})}))
Expand All @@ -124,6 +130,7 @@ testObject_Event_user_7 :: Event
testObject_Event_user_7 =
Event
(Qualified (Id (fromJust (UUID.fromString "00006ac1-0000-543e-0000-7c8f00000be7"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "0000355a-0000-2979-0000-083000002d5e"))) (Domain "faraway.example.com"))
(read "1864-04-18 05:01:13.761 UTC")
(EdTyping StoppedTyping)
Expand All @@ -132,6 +139,7 @@ testObject_Event_user_8 :: Event
testObject_Event_user_8 =
Event
(Qualified (Id (fromJust (UUID.fromString "000019e1-0000-1dc6-0000-68de0000246d"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00000457-0000-0689-0000-77a00000021c"))) (Domain "faraway.example.com"))
(read "1864-05-29 19:31:31.226 UTC")
( EdConversation
Expand Down Expand Up @@ -195,6 +203,7 @@ testObject_Event_user_9 :: Event
testObject_Event_user_9 =
Event
(Qualified (Id (fromJust (UUID.fromString "00000b98-0000-618d-0000-19e200004651"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00004bee-0000-45a0-0000-2c0300005726"))) (Domain "faraway.example.com"))
(read "1864-05-01 11:57:35.123 UTC")
(EdConvReceiptModeUpdate (ConversationReceiptModeUpdate {cruReceiptMode = ReceiptMode {unReceiptMode = -10505}}))
Expand All @@ -203,6 +212,7 @@ testObject_Event_user_10 :: Event
testObject_Event_user_10 =
Event
(Qualified (Id (fromJust (UUID.fromString "00005e43-0000-3b56-0000-7c270000538c"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00007f28-0000-40b1-0000-56ab0000748d"))) (Domain "faraway.example.com"))
(read "1864-05-25 01:31:49.802 UTC")
( EdConnect
Expand All @@ -222,6 +232,7 @@ testObject_Event_user_11 :: Event
testObject_Event_user_11 =
Event
(Qualified (Id (fromJust (UUID.fromString "0000303b-0000-23a9-0000-25de00002f80"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "000043a6-0000-1627-0000-490300002017"))) (Domain "faraway.example.com"))
(read "1864-04-12 01:28:25.705 UTC")
( EdMembersLeave
Expand All @@ -238,6 +249,7 @@ testObject_Event_user_12 :: Event
testObject_Event_user_12 =
Event
(Qualified (Id (fromJust (UUID.fromString "00000838-0000-1bc6-0000-686d00003565"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "0000114a-0000-7da8-0000-40cb00007fcf"))) (Domain "faraway.example.com"))
(read "1864-05-12 20:29:47.483 UTC")
( EdMembersJoin
Expand All @@ -260,6 +272,7 @@ testObject_Event_user_13 :: Event
testObject_Event_user_13 =
Event
(Qualified (Id (fromJust (UUID.fromString "00000838-0000-1bc6-0000-686d00003565"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "0000114a-0000-7da8-0000-40cb00007fcf"))) (Domain "faraway.example.com"))
(read "1864-05-12 20:29:47.483 UTC")
(EdConvRename (ConversationRename "New conversation name"))
Expand All @@ -268,6 +281,7 @@ testObject_Event_user_14 :: Event
testObject_Event_user_14 =
Event
(Qualified (Id (fromJust (UUID.fromString "00000838-0000-1bc6-0000-686d00003565"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "0000114a-0000-7da8-0000-40cb00007fcf"))) (Domain "faraway.example.com"))
(read "1864-05-12 20:29:47.483 UTC")
(EdConvCodeUpdate cc)
Expand All @@ -283,6 +297,7 @@ testObject_Event_user_15 :: Event
testObject_Event_user_15 =
Event
(Qualified (Id (fromJust (UUID.fromString "7cd50991-3cdd-40ec-bb0f-63ae17b2309d"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "04e68c50-027e-4e84-a33a-e2e28a7b8ea3"))) (Domain "faraway.example.com"))
(read "2021-11-10 05:39:44.297 UTC")
(EdMLSMessage "hello world")
Expand All @@ -291,6 +306,7 @@ testObject_Event_user_16 :: Event
testObject_Event_user_16 =
Event
(Qualified (Id (fromJust (UUID.fromString "6ec1c834-9ae6-4825-8809-61dde80be5ea"))) (Domain "faraway.example.com"))
Nothing
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

No examples with data present?

Copy link
Contributor Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Added a test case

(Qualified (Id (fromJust (UUID.fromString "e8f48b8f-fad3-4f60-98e3-a6df082c328d"))) (Domain "faraway.example.com"))
(read "2021-05-12 13:12:01.005 UTC")
(EdMLSWelcome "welcome message content")
4 changes: 3 additions & 1 deletion libs/wire-api/test/golden/Test/Wire/API/Golden/Generated/RemoveBotResponse_user.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,10 @@ module Test.Wire.API.Golden.Generated.RemoveBotResponse_user where

import Data.Domain
import Data.Id (Id (Id))
import Data.Maybe
import Data.Qualified
import qualified Data.UUID as UUID (fromString)
import Imports (fromJust, read)
import Imports (read)
import Wire.API.Conversation.Bot (RemoveBotResponse (..))
import Wire.API.Event.Conversation

Expand All @@ -33,6 +34,7 @@ testObject_RemoveBotResponse_user_1 =
{ rsRemoveBotEvent =
Event
(Qualified (Id (fromJust (UUID.fromString "00003ab8-0000-0cff-0000-427f000000df"))) (Domain "faraway.example.com"))
Nothing
(Qualified (Id (fromJust (UUID.fromString "00004166-0000-1e32-0000-52cb0000428d"))) (Domain "faraway.example.com"))
(read "1864-05-07 01:13:35.741 UTC")
( EdMembersLeave
Expand Down
5 changes: 5 additions & 0 deletions libs/wire-api/test/golden/Test/Wire/API/Golden/Manual.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -24,6 +24,7 @@ import Test.Wire.API.Golden.Manual.ClientCapabilityList
import Test.Wire.API.Golden.Manual.Contact
import Test.Wire.API.Golden.Manual.ConvIdsPage
import Test.Wire.API.Golden.Manual.ConversationCoverView
import Test.Wire.API.Golden.Manual.ConversationEvent
import Test.Wire.API.Golden.Manual.ConversationPagingState
import Test.Wire.API.Golden.Manual.ConversationsResponse
import Test.Wire.API.Golden.Manual.CreateScimToken
Expand Down Expand Up @@ -67,6 +68,10 @@ tests =
(testObject_ConversationCoverView_2, "testObject_ConversationCoverView_2.json"),
(testObject_ConversationCoverView_3, "testObject_ConversationCoverView_3.json")
],
testGroup "ConversationEvent" $
testObjects
[ (testObject_Event_conversation_manual_1, "testObject_Event_conversation_manual_1.json")
],
testGroup "GetPaginatedConversationIds" $
testObjects
[ (testObject_GetPaginatedConversationIds_1, "testObject_GetPaginatedConversationIds_1.json"),
Expand Down
Loading