From 256a51baa1bd55b71982d63613c6fa0d78a9dcb3 Mon Sep 17 00:00:00 2001 From: Pere Lev Date: Sat, 16 Mar 2024 12:00:53 +0200 Subject: [PATCH] Client: Invite: Fix bug in resource addressing verification --- src/Vervis/Actor/Person/Client.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Vervis/Actor/Person/Client.hs b/src/Vervis/Actor/Person/Client.hs index 23c95a0..ca7595a 100644 --- a/src/Vervis/Actor/Person/Client.hs +++ b/src/Vervis/Actor/Person/Client.hs @@ -934,7 +934,7 @@ clientInvite now personMeID (ClientMsg maybeCap localRecips remoteRecips fwdHost fetchRemoteResource instanceID h lu case result of Left (Entity actorID actor) -> - return (remoteActorIdent actor, actorID, u) + return (remoteActorIdent actor, actorID, ObjURI h lu) Right (objectID, luManager, (Entity actorID _)) -> return (objectID, actorID, ObjURI h luManager) )