sup39/vervis
1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-29 00:24:51 +09:00
Code Issues Activity

S2S: FIx bug in parsing Follow object

Browse source
This commit is contained in:
fr33domlover 2019-10-18 23:45:13 +00:00
parent 1e8dd71f23
commit d5063eaef9
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Vervis/Federation/Offer.hs
View file

@ -226,8 +226,8 @@ followF
local <- hostIsLocal hObj local <- hostIsLocal hObj
return $ return $
if local if local
then Nothing then objRoute =<< decodeRouteLocal luObj
else objRoute =<< decodeRouteLocal luObj else Nothing
case mobj of case mobj of
Nothing -> return "Follow object unrelated to me, ignoring activity" Nothing -> return "Follow object unrelated to me, ignoring activity"
Just obj -> do Just obj -> do