Browse Source

Adds "object" field for Activity

Jesse Hallett 9 years ago
parent
commit
0990468d78
1 changed files with 4 additions and 0 deletions
  1. 4 0
      Codec/ActivityStream/Dynamic.hs

+ 4 - 0
Codec/ActivityStream/Dynamic.hs

@@ -47,6 +47,7 @@ module Codec.ActivityStream.Dynamic
        , acGenerator
        , acIcon
        , acId
+       , acObject
        , acPublished
        , acProvider
        , acTarget
@@ -198,6 +199,9 @@ acIcon = makeAesonLensMb "icon" acRest
 acId :: Lens' Activity (Maybe Text)
 acId = makeAesonLensMb "id" acRest
 
+acObject :: Lens' Activity (Maybe Object)
+acObject = makeAesonLensMb "object" acRest
+
 acPublished :: Lens' Activity DateTime
 acPublished = makeAesonLens "published" acRest