gogol-apps-activity 0.4.0 → 0.5.0
raw patch · 5 files changed
+95/−75 lines, 5 filesdep ~gogol-corePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: gogol-core
API changes (from Hackage documentation)
Files
- README.md +1/−1
- gen/Network/Google/AppsActivity/Types.hs +1/−1
- gen/Network/Google/AppsActivity/Types/Product.hs +79/−64
- gen/Network/Google/Resource/AppsActivity/Activities/List.hs +12/−7
- gogol-apps-activity.cabal +2/−2
README.md view
@@ -8,7 +8,7 @@ ## Version -`0.3.0`+`0.5.0` ## Description
gen/Network/Google/AppsActivity/Types.hs view
@@ -131,4 +131,4 @@ -- | View the activity history of your Google apps activityScope :: Proxy '["https://www.googleapis.com/auth/activity"]-activityScope = Proxy;+activityScope = Proxy
gen/Network/Google/AppsActivity/Types/Product.hs view
@@ -24,12 +24,15 @@ -- Drive is a parent for all files within it. -- -- /See:/ 'parent' smart constructor.-data Parent = Parent'+data Parent =+ Parent' { _pIsRoot :: !(Maybe Bool) , _pId :: !(Maybe Text) , _pTitle :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Parent' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -41,13 +44,9 @@ -- * 'pTitle' parent :: Parent-parent =- Parent'- { _pIsRoot = Nothing- , _pId = Nothing- , _pTitle = Nothing- }+parent = Parent' {_pIsRoot = Nothing, _pId = Nothing, _pTitle = Nothing} + -- | Whether this is the root folder. pIsRoot :: Lens' Parent (Maybe Bool) pIsRoot = lens _pIsRoot (\ s a -> s{_pIsRoot = a})@@ -78,10 +77,13 @@ -- | Photo information for a user. -- -- /See:/ 'photo' smart constructor.-newtype Photo = Photo'+newtype Photo =+ Photo' { _pURL :: Maybe Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Photo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -89,11 +91,9 @@ -- * 'pURL' photo :: Photo-photo =- Photo'- { _pURL = Nothing- }+photo = Photo' {_pURL = Nothing} + -- | The URL of the photo. pURL :: Lens' Photo (Maybe Text) pURL = lens _pURL (\ s a -> s{_pURL = a})@@ -110,7 +110,8 @@ -- | Represents the changes associated with an action taken by a user. -- -- /See:/ 'event' smart constructor.-data Event = Event'+data Event =+ Event' { _ePrimaryEventType :: !(Maybe EventPrimaryEventType) , _eUser :: !(Maybe User) , _eEventTimeMillis :: !(Maybe (Textual Word64))@@ -120,8 +121,10 @@ , _ePermissionChanges :: !(Maybe [PermissionChange]) , _eTarget :: !(Maybe Target) , _eMove :: !(Maybe Move)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Event' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -146,7 +149,7 @@ event :: Event event =- Event'+ Event' { _ePrimaryEventType = Nothing , _eUser = Nothing , _eEventTimeMillis = Nothing@@ -158,6 +161,7 @@ , _eMove = Nothing } + -- | The main type of event that occurred. ePrimaryEventType :: Lens' Event (Maybe EventPrimaryEventType) ePrimaryEventType@@ -247,11 +251,14 @@ -- token to retrieve the next page of results. -- -- /See:/ 'listActivitiesResponse' smart constructor.-data ListActivitiesResponse = ListActivitiesResponse'+data ListActivitiesResponse =+ ListActivitiesResponse' { _larNextPageToken :: !(Maybe Text) , _larActivities :: !(Maybe [Activity])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListActivitiesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -262,11 +269,10 @@ listActivitiesResponse :: ListActivitiesResponse listActivitiesResponse =- ListActivitiesResponse'- { _larNextPageToken = Nothing- , _larActivities = Nothing- }+ ListActivitiesResponse'+ {_larNextPageToken = Nothing, _larActivities = Nothing} + -- | Token for the next page of results. larNextPageToken :: Lens' ListActivitiesResponse (Maybe Text) larNextPageToken@@ -300,11 +306,14 @@ -- a result of a permissionChange type event. -- -- /See:/ 'permissionChange' smart constructor.-data PermissionChange = PermissionChange'+data PermissionChange =+ PermissionChange' { _pcAddedPermissions :: !(Maybe [Permission]) , _pcRemovedPermissions :: !(Maybe [Permission])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PermissionChange' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -315,11 +324,10 @@ permissionChange :: PermissionChange permissionChange =- PermissionChange'- { _pcAddedPermissions = Nothing- , _pcRemovedPermissions = Nothing- }+ PermissionChange'+ {_pcAddedPermissions = Nothing, _pcRemovedPermissions = Nothing} + -- | Lists all Permission objects added. pcAddedPermissions :: Lens' PermissionChange [Permission] pcAddedPermissions@@ -354,14 +362,17 @@ -- | A representation of a user. -- -- /See:/ 'user' smart constructor.-data User = User'+data User =+ User' { _uPhoto :: !(Maybe Photo) , _uIsDeleted :: !(Maybe Bool) , _uName :: !(Maybe Text) , _uIsMe :: !(Maybe Bool) , _uPermissionId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'User' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -378,7 +389,7 @@ user :: User user =- User'+ User' { _uPhoto = Nothing , _uIsDeleted = Nothing , _uName = Nothing@@ -386,6 +397,7 @@ , _uPermissionId = Nothing } + -- | The profile photo of the user. Not present if the user has no profile -- photo. uPhoto :: Lens' User (Maybe Photo)@@ -437,11 +449,14 @@ -- among all events. -- -- /See:/ 'activity' smart constructor.-data Activity = Activity'+data Activity =+ Activity' { _aSingleEvents :: !(Maybe [Event]) , _aCombinedEvent :: !(Maybe Event)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Activity' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -451,12 +466,9 @@ -- * 'aCombinedEvent' activity :: Activity-activity =- Activity'- { _aSingleEvents = Nothing- , _aCombinedEvent = Nothing- }+activity = Activity' {_aSingleEvents = Nothing, _aCombinedEvent = Nothing} + -- | A list of all the Events that make up the Activity. aSingleEvents :: Lens' Activity [Event] aSingleEvents@@ -489,11 +501,14 @@ -- | Contains information about a renametype event. -- -- /See:/ 'rename' smart constructor.-data Rename = Rename'+data Rename =+ Rename' { _rNewTitle :: !(Maybe Text) , _rOldTitle :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Rename' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -503,12 +518,9 @@ -- * 'rOldTitle' rename :: Rename-rename =- Rename'- { _rNewTitle = Nothing- , _rOldTitle = Nothing- }+rename = Rename' {_rNewTitle = Nothing, _rOldTitle = Nothing} + -- | The new title. rNewTitle :: Lens' Rename (Maybe Text) rNewTitle@@ -538,15 +550,18 @@ -- contained in a corresponding Drive Permissions object. -- -- /See:/ 'permission' smart constructor.-data Permission = Permission'+data Permission =+ Permission' { _pWithLink :: !(Maybe Bool) , _pUser :: !(Maybe User) , _pRole :: !(Maybe PermissionRole) , _pName :: !(Maybe Text) , _pType :: !(Maybe PermissionType) , _pPermissionId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Permission' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -565,7 +580,7 @@ permission :: Permission permission =- Permission'+ Permission' { _pWithLink = Nothing , _pUser = Nothing , _pRole = Nothing@@ -574,6 +589,7 @@ , _pPermissionId = Nothing } + -- | Whether the permission requires a link to the file. pWithLink :: Lens' Permission (Maybe Bool) pWithLink@@ -626,12 +642,15 @@ -- | Information about the object modified by the event. -- -- /See:/ 'target' smart constructor.-data Target = Target'+data Target =+ Target' { _tMimeType :: !(Maybe Text) , _tName :: !(Maybe Text) , _tId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Target' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -643,13 +662,9 @@ -- * 'tId' target :: Target-target =- Target'- { _tMimeType = Nothing- , _tName = Nothing- , _tId = Nothing- }+target = Target' {_tMimeType = Nothing, _tName = Nothing, _tId = Nothing} + -- | The MIME type of the target. tMimeType :: Lens' Target (Maybe Text) tMimeType@@ -684,11 +699,14 @@ -- of a move type event. -- -- /See:/ 'move' smart constructor.-data Move = Move'+data Move =+ Move' { _mAddedParents :: !(Maybe [Parent]) , _mRemovedParents :: !(Maybe [Parent])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Move' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -698,11 +716,8 @@ -- * 'mRemovedParents' move :: Move-move =- Move'- { _mAddedParents = Nothing- , _mRemovedParents = Nothing- }+move = Move' {_mAddedParents = Nothing, _mRemovedParents = Nothing}+ -- | The added parent(s). mAddedParents :: Lens' Move [Parent]
gen/Network/Google/Resource/AppsActivity/Activities/List.hs view
@@ -21,7 +21,7 @@ -- Portability : non-portable (GHC extensions) -- -- Returns a list of activities visible to the current logged in user.--- Visible activities are determined by the visiblity settings of the+-- Visible activities are determined by the visibility settings of the -- object that was acted on, e.g. Drive files a user can see. An activity -- is a record of past events. Multiple events may be merged if they are -- similar. A request is scoped to activities from a given Google service@@ -69,14 +69,15 @@ Get '[JSON] ListActivitiesResponse -- | Returns a list of activities visible to the current logged in user.--- Visible activities are determined by the visiblity settings of the+-- Visible activities are determined by the visibility settings of the -- object that was acted on, e.g. Drive files a user can see. An activity -- is a record of past events. Multiple events may be merged if they are -- similar. A request is scoped to activities from a given Google service -- using the source parameter. -- -- /See:/ 'activitiesList' smart constructor.-data ActivitiesList = ActivitiesList'+data ActivitiesList =+ ActivitiesList' { _alDriveFileId :: !(Maybe Text) , _alDriveAncestorId :: !(Maybe Text) , _alGroupingStrategy :: !ActivitiesListGroupingStrategy@@ -84,8 +85,10 @@ , _alSource :: !(Maybe Text) , _alPageToken :: !(Maybe Text) , _alPageSize :: !(Textual Int32)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ActivitiesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -106,7 +109,7 @@ activitiesList :: ActivitiesList activitiesList =- ActivitiesList'+ ActivitiesList' { _alDriveFileId = Nothing , _alDriveAncestorId = Nothing , _alGroupingStrategy = DriveUi@@ -116,6 +119,7 @@ , _alPageSize = 50 } + -- | Identifies the Drive item to return activities for. alDriveFileId :: Lens' ActivitiesList (Maybe Text) alDriveFileId@@ -136,8 +140,9 @@ = lens _alGroupingStrategy (\ s a -> s{_alGroupingStrategy = a}) --- | Indicates the user to return activity for. Use the special value me to--- indicate the currently authenticated user.+-- | The ID used for ACL checks (does not filter the resulting event list by+-- the assigned value). Use the special value me to indicate the currently+-- authenticated user. alUserId :: Lens' ActivitiesList Text alUserId = lens _alUserId (\ s a -> s{_alUserId = a})
gogol-apps-activity.cabal view
@@ -1,5 +1,5 @@ name: gogol-apps-activity-version: 0.4.0+version: 0.5.0 synopsis: Google Drive Activity SDK. homepage: https://github.com/brendanhay/gogol bug-reports: https://github.com/brendanhay/gogol/issues@@ -42,5 +42,5 @@ , Network.Google.AppsActivity.Types.Sum build-depends:- gogol-core == 0.4.0.*+ gogol-core == 0.5.0.* , base >= 4.7 && < 5