NOTE: Federation is disabled on this instance!

• forge.angeley.es
• code.angeley.es

• Edit file src/Web/ActivityPub.hs 0 → 0

  +		69	, Resolve (..)
  …	…	…	…
  +		1337	data Resolve u = Resolve
  +		1338	{ resolveObject :: ObjURI u
  +		1339	}
  +		1340
  +		1341	parseResolve :: UriMode u => Object -> Parser (Resolve u)
  +		1342	parseResolve o = Resolve <$> o .: "object"
  +		1343
  +		1344	encodeResolve :: UriMode u => Resolve u -> Series
  +		1345	encodeResolve (Resolve obj) = "object" .= obj
  +		1346
  …	…	…	…
  +		1374	| ResolveActivity (Resolve u)
  …	…	…	…
  -	1387		"Accept" -> AcceptActivity <$> parseAccept a o
  -	1388		"Create" -> CreateActivity <$> parseCreate o a actor
  -	1389		"Follow" -> FollowActivity <$> parseFollow o
  -	1390		"Offer" -> OfferActivity <$> parseOffer o a actor
  -	1391		"Push" -> PushActivity <$> parsePush a o
  -	1392		"Reject" -> RejectActivity <$> parseReject o
  -	1393		"Undo" -> UndoActivity <$> parseUndo a o
  +		1399	"Accept" -> AcceptActivity <$> parseAccept a o
  +		1400	"Create" -> CreateActivity <$> parseCreate o a actor
  +		1401	"Follow" -> FollowActivity <$> parseFollow o
  +		1402	"Offer" -> OfferActivity <$> parseOffer o a actor
  +		1403	"Push" -> PushActivity <$> parsePush a o
  +		1404	"Reject" -> RejectActivity <$> parseReject o
  +		1405	"Resolve" -> ResolveActivity <$> parseResolve o
  +		1406	"Undo" -> UndoActivity <$> parseUndo a o
  …	…	…	…
  -	1407		activityType (AcceptActivity _) = "Accept"
  -	1408		activityType (CreateActivity _) = "Create"
  -	1409		activityType (FollowActivity _) = "Follow"
  -	1410		activityType (OfferActivity _) = "Offer"
  -	1411		activityType (PushActivity _) = "Push"
  -	1412		activityType (RejectActivity _) = "Reject"
  -	1413		activityType (UndoActivity _) = "Undo"
  -	1414		encodeSpecific h _ (AcceptActivity a) = encodeAccept h a
  -	1415		encodeSpecific h u (CreateActivity a) = encodeCreate h u a
  -	1416		encodeSpecific _ _ (FollowActivity a) = encodeFollow a
  -	1417		encodeSpecific h u (OfferActivity a) = encodeOffer h u a
  -	1418		encodeSpecific h _ (PushActivity a) = encodePush h a
  -	1419		encodeSpecific _ _ (RejectActivity a) = encodeReject a
  -	1420		encodeSpecific h _ (UndoActivity a) = encodeUndo h a
  +		1420	activityType (AcceptActivity _) = "Accept"
  +		1421	activityType (CreateActivity _) = "Create"
  +		1422	activityType (FollowActivity _) = "Follow"
  +		1423	activityType (OfferActivity _) = "Offer"
  +		1424	activityType (PushActivity _) = "Push"
  +		1425	activityType (RejectActivity _) = "Reject"
  +		1426	activityType (ResolveActivity _) = "Resolve"
  +		1427	activityType (UndoActivity _) = "Undo"
  +		1428	encodeSpecific h _ (AcceptActivity a) = encodeAccept h a
  +		1429	encodeSpecific h u (CreateActivity a) = encodeCreate h u a
  +		1430	encodeSpecific _ _ (FollowActivity a) = encodeFollow a
  +		1431	encodeSpecific h u (OfferActivity a) = encodeOffer h u a
  +		1432	encodeSpecific h _ (PushActivity a) = encodePush h a
  +		1433	encodeSpecific _ _ (RejectActivity a) = encodeReject a
  +		1434	encodeSpecific _ _ (ResolveActivity a) = encodeResolve a
  +		1435	encodeSpecific h _ (UndoActivity a) = encodeUndo h a
  …	…	…	…