1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-29 00:34:54 +09:00

S2S: FIx bug in parsing Follow object

This commit is contained in:
fr33domlover 2019-10-18 23:45:13 +00:00
parent 1e8dd71f23
commit d5063eaef9

View file

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