1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-28 07:04:52 +09:00

AP: When parsing a Follow, let "hide" not be specified, treat as false

This commit is contained in:
fr33domlover 2019-11-03 13:43:59 +00:00
parent 4bbfcd6521
commit 027b0012a5

View file

@ -1088,7 +1088,7 @@ parseFollow o =
Follow Follow
<$> o .: "object" <$> o .: "object"
<*> o .:? "context" <*> o .:? "context"
<*> o .: "hide" <*> o .:? "hide" .!= False
encodeFollow :: UriMode u => Follow u -> Series encodeFollow :: UriMode u => Follow u -> Series
encodeFollow (Follow obj mcontext hide) encodeFollow (Follow obj mcontext hide)