diff --git a/src/Vervis/ActivityPub.hs b/src/Vervis/ActivityPub.hs index e40ffae..e091894 100644 --- a/src/Vervis/ActivityPub.hs +++ b/src/Vervis/ActivityPub.hs @@ -336,7 +336,7 @@ deliverRemoteHTTP now shrRecip prjRecip body sig fetched = do in forwardActivity (ObjURI h inbox) sig sender body traverse_ (fork . deliverFetched deliver now) fetched where - fork = forkWorker "Project inbox handler: delivery failed" + fork = forkWorker "Inbox forwarding to remote members of local collections: delivery failed" deliverFetched deliver now ((_, h), recips@(r :| rs)) = do let (raid, _luActor, luInbox, fwid) = r e <- deliver h luInbox