Removes "provider" argument from `makeActivity`
According to the spec, the only required fields are "actor" and "published".
And I don't really have anything to put in the provider field yet.
Jesse Hallett
10 years ago
225 | 225 | |
226 | 226 | -- | Create an @Activity@ with an @actor@, @published@, and |
227 | 227 | -- @provider@ property. |
228 | makeActivity :: Object -> DateTime -> Object -> Activity | |
229 | makeActivity actor published provider = Activity | |
228 | makeActivity :: Object -> DateTime -> Activity | |
229 | makeActivity actor published = Activity | |
230 | 230 | $ HM.insert "actor" (toJSON actor) |
231 | 231 | $ HM.insert "published" (toJSON published) |
232 | $ HM.insert "provider" (toJSON provider) | |
233 | 232 | $ HM.empty |
234 | 233 | |
235 | 234 | -- | Collection |