packages feed

gogol-apps-tasks 0.5.0 → 1.0.0

raw patch · 39 files changed

+2622/−2393 lines, 39 filesdep −basedep ~gogol-coresetup-changed

Dependencies removed: base

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.5.0`+`1.0.0`   ## Description
Setup.hs view
@@ -1,2 +1,3 @@-import           Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/AppsTasks.hs view
@@ -0,0 +1,166 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- The Google Tasks API lets you manage your tasks and task lists.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference>+module Gogol.AppsTasks+  ( -- * Configuration+    appsTasksService,++    -- * OAuth Scopes+    Tasks'FullControl,+    Tasks'Readonly,++    -- * Resources++    -- ** tasks.tasklists.delete+    TasksTasklistsDeleteResource,+    TasksTasklistsDelete (..),+    newTasksTasklistsDelete,++    -- ** tasks.tasklists.get+    TasksTasklistsGetResource,+    TasksTasklistsGet (..),+    newTasksTasklistsGet,++    -- ** tasks.tasklists.insert+    TasksTasklistsInsertResource,+    TasksTasklistsInsert (..),+    newTasksTasklistsInsert,++    -- ** tasks.tasklists.list+    TasksTasklistsListResource,+    TasksTasklistsList (..),+    newTasksTasklistsList,++    -- ** tasks.tasklists.patch+    TasksTasklistsPatchResource,+    TasksTasklistsPatch (..),+    newTasksTasklistsPatch,++    -- ** tasks.tasklists.update+    TasksTasklistsUpdateResource,+    TasksTasklistsUpdate (..),+    newTasksTasklistsUpdate,++    -- ** tasks.tasks.clear+    TasksTasksClearResource,+    TasksTasksClear (..),+    newTasksTasksClear,++    -- ** tasks.tasks.delete+    TasksTasksDeleteResource,+    TasksTasksDelete (..),+    newTasksTasksDelete,++    -- ** tasks.tasks.get+    TasksTasksGetResource,+    TasksTasksGet (..),+    newTasksTasksGet,++    -- ** tasks.tasks.insert+    TasksTasksInsertResource,+    TasksTasksInsert (..),+    newTasksTasksInsert,++    -- ** tasks.tasks.list+    TasksTasksListResource,+    TasksTasksList (..),+    newTasksTasksList,++    -- ** tasks.tasks.move+    TasksTasksMoveResource,+    TasksTasksMove (..),+    newTasksTasksMove,++    -- ** tasks.tasks.patch+    TasksTasksPatchResource,+    TasksTasksPatch (..),+    newTasksTasksPatch,++    -- ** tasks.tasks.update+    TasksTasksUpdateResource,+    TasksTasksUpdate (..),+    newTasksTasksUpdate,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** AssignmentInfo+    AssignmentInfo (..),+    newAssignmentInfo,++    -- ** AssignmentInfo_SurfaceType+    AssignmentInfo_SurfaceType (..),++    -- ** DriveResourceInfo+    DriveResourceInfo (..),+    newDriveResourceInfo,++    -- ** SpaceInfo+    SpaceInfo (..),+    newSpaceInfo,++    -- ** Task+    Task (..),+    newTask,++    -- ** Task_LinksItem+    Task_LinksItem (..),+    newTask_LinksItem,++    -- ** TaskList+    TaskList (..),+    newTaskList,++    -- ** TaskLists+    TaskLists (..),+    newTaskLists,++    -- ** Tasks+    Tasks (..),+    newTasks,+  )+where++import Gogol.AppsTasks.Tasks.Clear+import Gogol.AppsTasks.Tasks.Delete+import Gogol.AppsTasks.Tasks.Get+import Gogol.AppsTasks.Tasks.Insert+import Gogol.AppsTasks.Tasks.List+import Gogol.AppsTasks.Tasks.Move+import Gogol.AppsTasks.Tasks.Patch+import Gogol.AppsTasks.Tasks.Tasklists.Delete+import Gogol.AppsTasks.Tasks.Tasklists.Get+import Gogol.AppsTasks.Tasks.Tasklists.Insert+import Gogol.AppsTasks.Tasks.Tasklists.List+import Gogol.AppsTasks.Tasks.Tasklists.Patch+import Gogol.AppsTasks.Tasks.Tasklists.Update+import Gogol.AppsTasks.Tasks.Update+import Gogol.AppsTasks.Types
+ gen/Gogol/AppsTasks/Internal/Product.hs view
@@ -0,0 +1,484 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Internal.Product+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.AppsTasks.Internal.Product+  ( -- * AssignmentInfo+    AssignmentInfo (..),+    newAssignmentInfo,++    -- * DriveResourceInfo+    DriveResourceInfo (..),+    newDriveResourceInfo,++    -- * SpaceInfo+    SpaceInfo (..),+    newSpaceInfo,++    -- * Task+    Task (..),+    newTask,++    -- * Task_LinksItem+    Task_LinksItem (..),+    newTask_LinksItem,++    -- * TaskList+    TaskList (..),+    newTaskList,++    -- * TaskLists+    TaskLists (..),+    newTaskLists,++    -- * Tasks+    Tasks (..),+    newTasks,+  )+where++import Gogol.AppsTasks.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Information about the source of the task assignment (Document, Chat Space).+--+-- /See:/ 'newAssignmentInfo' smart constructor.+data AssignmentInfo = AssignmentInfo+  { -- | Output only. Information about the Drive file where this task originates from. Currently, the Drive file can only be a document. This field is read-only.+    driveResourceInfo :: (Core.Maybe DriveResourceInfo),+    -- | Output only. An absolute link to the original task in the surface of assignment (Docs, Chat spaces, etc.).+    linkToTask :: (Core.Maybe Core.Text),+    -- | Output only. Information about the Chat Space where this task originates from. This field is read-only.+    spaceInfo :: (Core.Maybe SpaceInfo),+    -- | Output only. The type of surface this assigned task originates from. Currently limited to DOCUMENT or SPACE.+    surfaceType :: (Core.Maybe AssignmentInfo_SurfaceType)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AssignmentInfo' with the minimum fields required to make a request.+newAssignmentInfo ::+  AssignmentInfo+newAssignmentInfo =+  AssignmentInfo+    { driveResourceInfo = Core.Nothing,+      linkToTask = Core.Nothing,+      spaceInfo = Core.Nothing,+      surfaceType = Core.Nothing+    }++instance Core.FromJSON AssignmentInfo where+  parseJSON =+    Core.withObject+      "AssignmentInfo"+      ( \o ->+          AssignmentInfo+            Core.<$> (o Core..:? "driveResourceInfo")+            Core.<*> (o Core..:? "linkToTask")+            Core.<*> (o Core..:? "spaceInfo")+            Core.<*> (o Core..:? "surfaceType")+      )++instance Core.ToJSON AssignmentInfo where+  toJSON AssignmentInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("driveResourceInfo" Core..=) Core.<$> driveResourceInfo,+            ("linkToTask" Core..=) Core.<$> linkToTask,+            ("spaceInfo" Core..=) Core.<$> spaceInfo,+            ("surfaceType" Core..=) Core.<$> surfaceType+          ]+      )++-- | Information about the Drive resource where a task was assigned from (the document, sheet, etc.).+--+-- /See:/ 'newDriveResourceInfo' smart constructor.+data DriveResourceInfo = DriveResourceInfo+  { -- | Output only. Identifier of the file in the Drive API.+    driveFileId :: (Core.Maybe Core.Text),+    -- | Output only. Resource key required to access files shared via a shared link. Not required for all files. See also developers.google.com\/drive\/api\/guides\/resource-keys.+    resourceKey :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DriveResourceInfo' with the minimum fields required to make a request.+newDriveResourceInfo ::+  DriveResourceInfo+newDriveResourceInfo =+  DriveResourceInfo+    { driveFileId = Core.Nothing,+      resourceKey = Core.Nothing+    }++instance Core.FromJSON DriveResourceInfo where+  parseJSON =+    Core.withObject+      "DriveResourceInfo"+      ( \o ->+          DriveResourceInfo+            Core.<$> (o Core..:? "driveFileId")+            Core.<*> (o Core..:? "resourceKey")+      )++instance Core.ToJSON DriveResourceInfo where+  toJSON DriveResourceInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("driveFileId" Core..=) Core.<$> driveFileId,+            ("resourceKey" Core..=) Core.<$> resourceKey+          ]+      )++-- | Information about the Chat Space where a task was assigned from.+--+-- /See:/ 'newSpaceInfo' smart constructor.+newtype SpaceInfo = SpaceInfo+  { -- | Output only. The Chat space where this task originates from. The format is \"spaces\/{space}\".+    space :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SpaceInfo' with the minimum fields required to make a request.+newSpaceInfo ::+  SpaceInfo+newSpaceInfo = SpaceInfo {space = Core.Nothing}++instance Core.FromJSON SpaceInfo where+  parseJSON =+    Core.withObject+      "SpaceInfo"+      (\o -> SpaceInfo Core.<$> (o Core..:? "space"))++instance Core.ToJSON SpaceInfo where+  toJSON SpaceInfo {..} =+    Core.object (Core.catMaybes [("space" Core..=) Core.<$> space])++--+-- /See:/ 'newTask' smart constructor.+data Task = Task+  { -- | Output only. Context information for assigned tasks. A task can be assigned to a user, currently possible from surfaces like Docs and Chat Spaces. This field is populated for tasks assigned to the current user and identifies where the task was assigned from. This field is read-only.+    assignmentInfo :: (Core.Maybe AssignmentInfo),+    -- | Completion date of the task (as a RFC 3339 timestamp). This field is omitted if the task has not been completed.+    completed :: (Core.Maybe Core.Text),+    -- | Flag indicating whether the task has been deleted. For assigned tasks this field is read-only. They can only be deleted by calling tasks.delete, in which case both the assigned task and the original task (in Docs or Chat Spaces) are deleted. To delete the assigned task only, navigate to the assignment surface and unassign the task from there. The default is False.+    deleted :: (Core.Maybe Core.Bool),+    -- | Due date of the task (as a RFC 3339 timestamp). Optional. The due date only records date information; the time portion of the timestamp is discarded when setting the due date. It isn\'t possible to read or write the time that a task is due via the API.+    due :: (Core.Maybe Core.Text),+    -- | ETag of the resource.+    etag :: (Core.Maybe Core.Text),+    -- | Flag indicating whether the task is hidden. This is the case if the task had been marked completed when the task list was last cleared. The default is False. This field is read-only.+    hidden :: (Core.Maybe Core.Bool),+    -- | Task identifier.+    id :: (Core.Maybe Core.Text),+    -- | Output only. Type of the resource. This is always \"tasks#task\".+    kind :: (Core.Maybe Core.Text),+    -- | Output only. Collection of links. This collection is read-only.+    links :: (Core.Maybe [Task_LinksItem]),+    -- | Notes describing the task. Tasks assigned from Google Docs cannot have notes. Optional. Maximum length allowed: 8192 characters.+    notes :: (Core.Maybe Core.Text),+    -- | Output only. Parent task identifier. This field is omitted if it is a top-level task. Use the \"move\" method to move the task under a different parent or to the top level. A parent task can never be an assigned task (from Chat Spaces, Docs). This field is read-only.+    parent :: (Core.Maybe Core.Text),+    -- | Output only. String indicating the position of the task among its sibling tasks under the same parent task or at the top level. If this string is greater than another task\'s corresponding position string according to lexicographical ordering, the task is positioned after the other task under the same parent task (or at the top level). Use the \"move\" method to move the task to another position.+    position :: (Core.Maybe Core.Text),+    -- | Output only. URL pointing to this task. Used to retrieve, update, or delete this task.+    selfLink :: (Core.Maybe Core.Text),+    -- | Status of the task. This is either \"needsAction\" or \"completed\".+    status :: (Core.Maybe Core.Text),+    -- | Title of the task. Maximum length allowed: 1024 characters.+    title :: (Core.Maybe Core.Text),+    -- | Output only. Last modification time of the task (as a RFC 3339 timestamp).+    updated :: (Core.Maybe Core.Text),+    -- | Output only. An absolute link to the task in the Google Tasks Web UI.+    webViewLink :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Task' with the minimum fields required to make a request.+newTask ::+  Task+newTask =+  Task+    { assignmentInfo = Core.Nothing,+      completed = Core.Nothing,+      deleted = Core.Nothing,+      due = Core.Nothing,+      etag = Core.Nothing,+      hidden = Core.Nothing,+      id = Core.Nothing,+      kind = Core.Nothing,+      links = Core.Nothing,+      notes = Core.Nothing,+      parent = Core.Nothing,+      position = Core.Nothing,+      selfLink = Core.Nothing,+      status = Core.Nothing,+      title = Core.Nothing,+      updated = Core.Nothing,+      webViewLink = Core.Nothing+    }++instance Core.FromJSON Task where+  parseJSON =+    Core.withObject+      "Task"+      ( \o ->+          Task+            Core.<$> (o Core..:? "assignmentInfo")+            Core.<*> (o Core..:? "completed")+            Core.<*> (o Core..:? "deleted")+            Core.<*> (o Core..:? "due")+            Core.<*> (o Core..:? "etag")+            Core.<*> (o Core..:? "hidden")+            Core.<*> (o Core..:? "id")+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "links")+            Core.<*> (o Core..:? "notes")+            Core.<*> (o Core..:? "parent")+            Core.<*> (o Core..:? "position")+            Core.<*> (o Core..:? "selfLink")+            Core.<*> (o Core..:? "status")+            Core.<*> (o Core..:? "title")+            Core.<*> (o Core..:? "updated")+            Core.<*> (o Core..:? "webViewLink")+      )++instance Core.ToJSON Task where+  toJSON Task {..} =+    Core.object+      ( Core.catMaybes+          [ ("assignmentInfo" Core..=) Core.<$> assignmentInfo,+            ("completed" Core..=) Core.<$> completed,+            ("deleted" Core..=) Core.<$> deleted,+            ("due" Core..=) Core.<$> due,+            ("etag" Core..=) Core.<$> etag,+            ("hidden" Core..=) Core.<$> hidden,+            ("id" Core..=) Core.<$> id,+            ("kind" Core..=) Core.<$> kind,+            ("links" Core..=) Core.<$> links,+            ("notes" Core..=) Core.<$> notes,+            ("parent" Core..=) Core.<$> parent,+            ("position" Core..=) Core.<$> position,+            ("selfLink" Core..=) Core.<$> selfLink,+            ("status" Core..=) Core.<$> status,+            ("title" Core..=) Core.<$> title,+            ("updated" Core..=) Core.<$> updated,+            ("webViewLink" Core..=) Core.<$> webViewLink+          ]+      )++--+-- /See:/ 'newTask_LinksItem' smart constructor.+data Task_LinksItem = Task_LinksItem+  { -- | The description. In HTML speak: Everything between \<a> and \<\/a>.+    description :: (Core.Maybe Core.Text),+    -- | The URL.+    link :: (Core.Maybe Core.Text),+    -- | Type of the link, e.g. \"email\".+    type' :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Task_LinksItem' with the minimum fields required to make a request.+newTask_LinksItem ::+  Task_LinksItem+newTask_LinksItem =+  Task_LinksItem+    { description = Core.Nothing,+      link = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON Task_LinksItem where+  parseJSON =+    Core.withObject+      "Task_LinksItem"+      ( \o ->+          Task_LinksItem+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "link")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON Task_LinksItem where+  toJSON Task_LinksItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("link" Core..=) Core.<$> link,+            ("type" Core..=) Core.<$> type'+          ]+      )++--+-- /See:/ 'newTaskList' smart constructor.+data TaskList = TaskList+  { -- | ETag of the resource.+    etag :: (Core.Maybe Core.Text),+    -- | Task list identifier.+    id :: (Core.Maybe Core.Text),+    -- | Output only. Type of the resource. This is always \"tasks#taskList\".+    kind :: (Core.Maybe Core.Text),+    -- | Output only. URL pointing to this task list. Used to retrieve, update, or delete this task list.+    selfLink :: (Core.Maybe Core.Text),+    -- | Title of the task list. Maximum length allowed: 1024 characters.+    title :: (Core.Maybe Core.Text),+    -- | Output only. Last modification time of the task list (as a RFC 3339 timestamp).+    updated :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TaskList' with the minimum fields required to make a request.+newTaskList ::+  TaskList+newTaskList =+  TaskList+    { etag = Core.Nothing,+      id = Core.Nothing,+      kind = Core.Nothing,+      selfLink = Core.Nothing,+      title = Core.Nothing,+      updated = Core.Nothing+    }++instance Core.FromJSON TaskList where+  parseJSON =+    Core.withObject+      "TaskList"+      ( \o ->+          TaskList+            Core.<$> (o Core..:? "etag")+            Core.<*> (o Core..:? "id")+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "selfLink")+            Core.<*> (o Core..:? "title")+            Core.<*> (o Core..:? "updated")+      )++instance Core.ToJSON TaskList where+  toJSON TaskList {..} =+    Core.object+      ( Core.catMaybes+          [ ("etag" Core..=) Core.<$> etag,+            ("id" Core..=) Core.<$> id,+            ("kind" Core..=) Core.<$> kind,+            ("selfLink" Core..=) Core.<$> selfLink,+            ("title" Core..=) Core.<$> title,+            ("updated" Core..=) Core.<$> updated+          ]+      )++--+-- /See:/ 'newTaskLists' smart constructor.+data TaskLists = TaskLists+  { -- | ETag of the resource.+    etag :: (Core.Maybe Core.Text),+    -- | Collection of task lists.+    items :: (Core.Maybe [TaskList]),+    -- | Type of the resource. This is always \"tasks#taskLists\".+    kind :: (Core.Maybe Core.Text),+    -- | Token that can be used to request the next page of this result.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TaskLists' with the minimum fields required to make a request.+newTaskLists ::+  TaskLists+newTaskLists =+  TaskLists+    { etag = Core.Nothing,+      items = Core.Nothing,+      kind = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON TaskLists where+  parseJSON =+    Core.withObject+      "TaskLists"+      ( \o ->+          TaskLists+            Core.<$> (o Core..:? "etag")+            Core.<*> (o Core..:? "items")+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON TaskLists where+  toJSON TaskLists {..} =+    Core.object+      ( Core.catMaybes+          [ ("etag" Core..=) Core.<$> etag,+            ("items" Core..=) Core.<$> items,+            ("kind" Core..=) Core.<$> kind,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++--+-- /See:/ 'newTasks' smart constructor.+data Tasks = Tasks+  { -- | ETag of the resource.+    etag :: (Core.Maybe Core.Text),+    -- | Collection of tasks.+    items :: (Core.Maybe [Task]),+    -- | Type of the resource. This is always \"tasks#tasks\".+    kind :: (Core.Maybe Core.Text),+    -- | Token used to access the next page of this result.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Tasks' with the minimum fields required to make a request.+newTasks ::+  Tasks+newTasks =+  Tasks+    { etag = Core.Nothing,+      items = Core.Nothing,+      kind = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON Tasks where+  parseJSON =+    Core.withObject+      "Tasks"+      ( \o ->+          Tasks+            Core.<$> (o Core..:? "etag")+            Core.<*> (o Core..:? "items")+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON Tasks where+  toJSON Tasks {..} =+    Core.object+      ( Core.catMaybes+          [ ("etag" Core..=) Core.<$> etag,+            ("items" Core..=) Core.<$> items,+            ("kind" Core..=) Core.<$> kind,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )
+ gen/Gogol/AppsTasks/Internal/Sum.hs view
@@ -0,0 +1,109 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Internal.Sum+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.AppsTasks.Internal.Sum+  ( -- * Xgafv+    Xgafv+      ( Xgafv_1,+        Xgafv_2,+        ..+      ),++    -- * AssignmentInfo_SurfaceType+    AssignmentInfo_SurfaceType+      ( AssignmentInfo_SurfaceType_CONTEXTTYPEUNSPECIFIED,+        AssignmentInfo_SurfaceType_Gmail,+        AssignmentInfo_SurfaceType_Document,+        AssignmentInfo_SurfaceType_Space,+        ..+      ),+  )+where++import Gogol.Prelude qualified as Core++-- | V1 error format.+newtype Xgafv = Xgafv {fromXgafv :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | v1 error format+pattern Xgafv_1 :: Xgafv+pattern Xgafv_1 = Xgafv "1"++-- | v2 error format+pattern Xgafv_2 :: Xgafv+pattern Xgafv_2 = Xgafv "2"++{-# COMPLETE+  Xgafv_1,+  Xgafv_2,+  Xgafv+  #-}++-- | Output only. The type of surface this assigned task originates from. Currently limited to DOCUMENT or SPACE.+newtype AssignmentInfo_SurfaceType = AssignmentInfo_SurfaceType {fromAssignmentInfo_SurfaceType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown value for this task\'s context.+pattern AssignmentInfo_SurfaceType_CONTEXTTYPEUNSPECIFIED :: AssignmentInfo_SurfaceType+pattern AssignmentInfo_SurfaceType_CONTEXTTYPEUNSPECIFIED = AssignmentInfo_SurfaceType "CONTEXT_TYPE_UNSPECIFIED"++-- | The task is created from Gmail.+pattern AssignmentInfo_SurfaceType_Gmail :: AssignmentInfo_SurfaceType+pattern AssignmentInfo_SurfaceType_Gmail = AssignmentInfo_SurfaceType "GMAIL"++-- | The task is assigned from a document.+pattern AssignmentInfo_SurfaceType_Document :: AssignmentInfo_SurfaceType+pattern AssignmentInfo_SurfaceType_Document = AssignmentInfo_SurfaceType "DOCUMENT"++-- | The task is assigned from a Chat Space.+pattern AssignmentInfo_SurfaceType_Space :: AssignmentInfo_SurfaceType+pattern AssignmentInfo_SurfaceType_Space = AssignmentInfo_SurfaceType "SPACE"++{-# COMPLETE+  AssignmentInfo_SurfaceType_CONTEXTTYPEUNSPECIFIED,+  AssignmentInfo_SurfaceType_Gmail,+  AssignmentInfo_SurfaceType_Document,+  AssignmentInfo_SurfaceType_Space,+  AssignmentInfo_SurfaceType+  #-}
+ gen/Gogol/AppsTasks/Tasks/Clear.hs view
@@ -0,0 +1,110 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Clear+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Clears all completed tasks from the specified task list. The affected tasks will be marked as \'hidden\' and no longer be returned by default when retrieving all tasks for a task list.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.clear@.+module Gogol.AppsTasks.Tasks.Clear+  ( -- * Resource+    TasksTasksClearResource,++    -- ** Constructing a Request+    TasksTasksClear (..),+    newTasksTasksClear,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.clear@ method which the+-- 'TasksTasksClear' request conforms to.+type TasksTasksClearResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "clear"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Post '[Core.JSON] ()++-- | Clears all completed tasks from the specified task list. The affected tasks will be marked as \'hidden\' and no longer be returned by default when retrieving all tasks for a task list.+--+-- /See:/ 'newTasksTasksClear' smart constructor.+data TasksTasksClear = TasksTasksClear+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksClear' with the minimum fields required to make a request.+newTasksTasksClear ::+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksClear+newTasksTasksClear tasklist =+  TasksTasksClear+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksClear where+  type Rs TasksTasksClear = ()+  type Scopes TasksTasksClear = '[Tasks'FullControl]+  requestClient TasksTasksClear {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksClearResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Delete.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified task from the task list. If the task is assigned, both the assigned task and the original task (in Docs, Chat Spaces) are deleted. To delete the assigned task only, navigate to the assignment surface and unassign the task from there.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.delete@.+module Gogol.AppsTasks.Tasks.Delete+  ( -- * Resource+    TasksTasksDeleteResource,++    -- ** Constructing a Request+    TasksTasksDelete (..),+    newTasksTasksDelete,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.delete@ method which the+-- 'TasksTasksDelete' request conforms to.+type TasksTasksDeleteResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.Capture "task" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] ()++-- | Deletes the specified task from the task list. If the task is assigned, both the assigned task and the original task (in Docs, Chat Spaces) are deleted. To delete the assigned task only, navigate to the assignment surface and unassign the task from there.+--+-- /See:/ 'newTasksTasksDelete' smart constructor.+data TasksTasksDelete = TasksTasksDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Task identifier.+    task :: Core.Text,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksDelete' with the minimum fields required to make a request.+newTasksTasksDelete ::+  -- |  Task identifier. See 'task'.+  Core.Text ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksDelete+newTasksTasksDelete task tasklist =+  TasksTasksDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      task = task,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksDelete where+  type Rs TasksTasksDelete = ()+  type Scopes TasksTasksDelete = '[Tasks'FullControl]+  requestClient TasksTasksDelete {..} =+    go+      tasklist+      task+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksDeleteResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Get.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the specified task.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.get@.+module Gogol.AppsTasks.Tasks.Get+  ( -- * Resource+    TasksTasksGetResource,++    -- ** Constructing a Request+    TasksTasksGet (..),+    newTasksTasksGet,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.get@ method which the+-- 'TasksTasksGet' request conforms to.+type TasksTasksGetResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.Capture "task" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Task++-- | Returns the specified task.+--+-- /See:/ 'newTasksTasksGet' smart constructor.+data TasksTasksGet = TasksTasksGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Task identifier.+    task :: Core.Text,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksGet' with the minimum fields required to make a request.+newTasksTasksGet ::+  -- |  Task identifier. See 'task'.+  Core.Text ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksGet+newTasksTasksGet task tasklist =+  TasksTasksGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      task = task,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksGet where+  type Rs TasksTasksGet = Task+  type Scopes TasksTasksGet = '[Tasks'FullControl, Tasks'Readonly]+  requestClient TasksTasksGet {..} =+    go+      tasklist+      task+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksGetResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Insert.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Insert+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a new task on the specified task list. Tasks assigned from Docs or Chat Spaces cannot be inserted from Tasks Public API; they can only be created by assigning them from Docs or Chat Spaces. A user can have up to 20,000 non-hidden tasks per list and up to 100,000 tasks in total at a time.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.insert@.+module Gogol.AppsTasks.Tasks.Insert+  ( -- * Resource+    TasksTasksInsertResource,++    -- ** Constructing a Request+    TasksTasksInsert (..),+    newTasksTasksInsert,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.insert@ method which the+-- 'TasksTasksInsert' request conforms to.+type TasksTasksInsertResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "parent" Core.Text+    Core.:> Core.QueryParam "previous" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Task+    Core.:> Core.Post '[Core.JSON] Task++-- | Creates a new task on the specified task list. Tasks assigned from Docs or Chat Spaces cannot be inserted from Tasks Public API; they can only be created by assigning them from Docs or Chat Spaces. A user can have up to 20,000 non-hidden tasks per list and up to 100,000 tasks in total at a time.+--+-- /See:/ 'newTasksTasksInsert' smart constructor.+data TasksTasksInsert = TasksTasksInsert+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Parent task identifier. If the task is created at the top level, this parameter is omitted. An assigned task cannot be a parent task, nor can it have a parent. Setting the parent to an assigned task results in failure of the request. Optional.+    parent :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: Task,+    -- | Previous sibling task identifier. If the task is created at the first position among its siblings, this parameter is omitted. Optional.+    previous :: (Core.Maybe Core.Text),+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksInsert' with the minimum fields required to make a request.+newTasksTasksInsert ::+  -- |  Multipart request metadata. See 'payload'.+  Task ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksInsert+newTasksTasksInsert payload tasklist =+  TasksTasksInsert+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      parent = Core.Nothing,+      payload = payload,+      previous = Core.Nothing,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksInsert where+  type Rs TasksTasksInsert = Task+  type Scopes TasksTasksInsert = '[Tasks'FullControl]+  requestClient TasksTasksInsert {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      parent+      previous+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksInsertResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/List.hs view
@@ -0,0 +1,165 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns all tasks in the specified task list. Does not return assigned tasks be default (from Docs, Chat Spaces). A user can have up to 20,000 non-hidden tasks per list and up to 100,000 tasks in total at a time.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.list@.+module Gogol.AppsTasks.Tasks.List+  ( -- * Resource+    TasksTasksListResource,++    -- ** Constructing a Request+    TasksTasksList (..),+    newTasksTasksList,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.list@ method which the+-- 'TasksTasksList' request conforms to.+type TasksTasksListResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "completedMax" Core.Text+    Core.:> Core.QueryParam "completedMin" Core.Text+    Core.:> Core.QueryParam "dueMax" Core.Text+    Core.:> Core.QueryParam "dueMin" Core.Text+    Core.:> Core.QueryParam "maxResults" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "showAssigned" Core.Bool+    Core.:> Core.QueryParam "showCompleted" Core.Bool+    Core.:> Core.QueryParam "showDeleted" Core.Bool+    Core.:> Core.QueryParam "showHidden" Core.Bool+    Core.:> Core.QueryParam "updatedMin" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Tasks++-- | Returns all tasks in the specified task list. Does not return assigned tasks be default (from Docs, Chat Spaces). A user can have up to 20,000 non-hidden tasks per list and up to 100,000 tasks in total at a time.+--+-- /See:/ 'newTasksTasksList' smart constructor.+data TasksTasksList = TasksTasksList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Upper bound for a task\'s completion date (as a RFC 3339 timestamp) to filter by. Optional. The default is not to filter by completion date.+    completedMax :: (Core.Maybe Core.Text),+    -- | Lower bound for a task\'s completion date (as a RFC 3339 timestamp) to filter by. Optional. The default is not to filter by completion date.+    completedMin :: (Core.Maybe Core.Text),+    -- | Upper bound for a task\'s due date (as a RFC 3339 timestamp) to filter by. Optional. The default is not to filter by due date.+    dueMax :: (Core.Maybe Core.Text),+    -- | Lower bound for a task\'s due date (as a RFC 3339 timestamp) to filter by. Optional. The default is not to filter by due date.+    dueMin :: (Core.Maybe Core.Text),+    -- | Maximum number of tasks returned on one page. Optional. The default is 20 (max allowed: 100).+    maxResults :: (Core.Maybe Core.Int32),+    -- | Token specifying the result page to return. Optional.+    pageToken :: (Core.Maybe Core.Text),+    -- | Optional. Flag indicating whether tasks assigned to the current user are returned in the result. Optional. The default is False.+    showAssigned :: (Core.Maybe Core.Bool),+    -- | Flag indicating whether completed tasks are returned in the result. Note that showHidden must also be True to show tasks completed in first party clients, such as the web UI and Google\'s mobile apps. Optional. The default is True.+    showCompleted :: (Core.Maybe Core.Bool),+    -- | Flag indicating whether deleted tasks are returned in the result. Optional. The default is False.+    showDeleted :: (Core.Maybe Core.Bool),+    -- | Flag indicating whether hidden tasks are returned in the result. Optional. The default is False.+    showHidden :: (Core.Maybe Core.Bool),+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Lower bound for a task\'s last modification time (as a RFC 3339 timestamp) to filter by. Optional. The default is not to filter by last modification time.+    updatedMin :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksList' with the minimum fields required to make a request.+newTasksTasksList ::+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksList+newTasksTasksList tasklist =+  TasksTasksList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      completedMax = Core.Nothing,+      completedMin = Core.Nothing,+      dueMax = Core.Nothing,+      dueMin = Core.Nothing,+      maxResults = Core.Nothing,+      pageToken = Core.Nothing,+      showAssigned = Core.Nothing,+      showCompleted = Core.Nothing,+      showDeleted = Core.Nothing,+      showHidden = Core.Nothing,+      tasklist = tasklist,+      updatedMin = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksList where+  type Rs TasksTasksList = Tasks+  type Scopes TasksTasksList = '[Tasks'FullControl, Tasks'Readonly]+  requestClient TasksTasksList {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      completedMax+      completedMin+      dueMax+      dueMin+      maxResults+      pageToken+      showAssigned+      showCompleted+      showDeleted+      showHidden+      updatedMin+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksListResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Move.hs view
@@ -0,0 +1,133 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Move+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Moves the specified task to another position in the destination task list. If the destination list is not specified, the task is moved within its current list. This can include putting it as a child task under a new parent and\/or move it to a different position among its sibling tasks. A user can have up to 2,000 subtasks per task.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.move@.+module Gogol.AppsTasks.Tasks.Move+  ( -- * Resource+    TasksTasksMoveResource,++    -- ** Constructing a Request+    TasksTasksMove (..),+    newTasksTasksMove,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.move@ method which the+-- 'TasksTasksMove' request conforms to.+type TasksTasksMoveResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.Capture "task" Core.Text+    Core.:> "move"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "destinationTasklist" Core.Text+    Core.:> Core.QueryParam "parent" Core.Text+    Core.:> Core.QueryParam "previous" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Post '[Core.JSON] Task++-- | Moves the specified task to another position in the destination task list. If the destination list is not specified, the task is moved within its current list. This can include putting it as a child task under a new parent and\/or move it to a different position among its sibling tasks. A user can have up to 2,000 subtasks per task.+--+-- /See:/ 'newTasksTasksMove' smart constructor.+data TasksTasksMove = TasksTasksMove+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Optional. Destination task list identifier. If set, the task is moved from tasklist to the destinationTasklist list. Otherwise the task is moved within its current list. Recurrent tasks cannot currently be moved between lists.+    destinationTasklist :: (Core.Maybe Core.Text),+    -- | Optional. New parent task identifier. If the task is moved to the top level, this parameter is omitted. The task set as parent must exist in the task list and can not be hidden. Exceptions: 1. Assigned tasks can not be set as parent task (have subtasks) or be moved under a parent task (become subtasks). 2. Tasks that are both completed and hidden cannot be nested, so the parent field must be empty.+    parent :: (Core.Maybe Core.Text),+    -- | Optional. New previous sibling task identifier. If the task is moved to the first position among its siblings, this parameter is omitted. The task set as previous must exist in the task list and can not be hidden. Exceptions: 1. Tasks that are both completed and hidden can only be moved to position 0, so the previous field must be empty.+    previous :: (Core.Maybe Core.Text),+    -- | Task identifier.+    task :: Core.Text,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksMove' with the minimum fields required to make a request.+newTasksTasksMove ::+  -- |  Task identifier. See 'task'.+  Core.Text ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksMove+newTasksTasksMove task tasklist =+  TasksTasksMove+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      destinationTasklist = Core.Nothing,+      parent = Core.Nothing,+      previous = Core.Nothing,+      task = task,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksMove where+  type Rs TasksTasksMove = Task+  type Scopes TasksTasksMove = '[Tasks'FullControl]+  requestClient TasksTasksMove {..} =+    go+      tasklist+      task+      xgafv+      accessToken+      callback+      destinationTasklist+      parent+      previous+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksMoveResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Patch.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Patch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the specified task. This method supports patch semantics.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.patch@.+module Gogol.AppsTasks.Tasks.Patch+  ( -- * Resource+    TasksTasksPatchResource,++    -- ** Constructing a Request+    TasksTasksPatch (..),+    newTasksTasksPatch,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.patch@ method which the+-- 'TasksTasksPatch' request conforms to.+type TasksTasksPatchResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.Capture "task" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Task+    Core.:> Core.Patch '[Core.JSON] Task++-- | Updates the specified task. This method supports patch semantics.+--+-- /See:/ 'newTasksTasksPatch' smart constructor.+data TasksTasksPatch = TasksTasksPatch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: Task,+    -- | Task identifier.+    task :: Core.Text,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksPatch' with the minimum fields required to make a request.+newTasksTasksPatch ::+  -- |  Multipart request metadata. See 'payload'.+  Task ->+  -- |  Task identifier. See 'task'.+  Core.Text ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksPatch+newTasksTasksPatch payload task tasklist =+  TasksTasksPatch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      task = task,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksPatch where+  type Rs TasksTasksPatch = Task+  type Scopes TasksTasksPatch = '[Tasks'FullControl]+  requestClient TasksTasksPatch {..} =+    go+      tasklist+      task+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksPatchResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Tasklists/Delete.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Tasklists.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the authenticated user\'s specified task list. If the list contains assigned tasks, both the assigned tasks and the original tasks in the assignment surface (Docs, Chat Spaces) are deleted.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasklists.delete@.+module Gogol.AppsTasks.Tasks.Tasklists.Delete+  ( -- * Resource+    TasksTasklistsDeleteResource,++    -- ** Constructing a Request+    TasksTasklistsDelete (..),+    newTasksTasklistsDelete,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasklists.delete@ method which the+-- 'TasksTasklistsDelete' request conforms to.+type TasksTasklistsDeleteResource =+  "tasks"+    Core.:> "v1"+    Core.:> "users"+    Core.:> "@me"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] ()++-- | Deletes the authenticated user\'s specified task list. If the list contains assigned tasks, both the assigned tasks and the original tasks in the assignment surface (Docs, Chat Spaces) are deleted.+--+-- /See:/ 'newTasksTasklistsDelete' smart constructor.+data TasksTasklistsDelete = TasksTasklistsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasklistsDelete' with the minimum fields required to make a request.+newTasksTasklistsDelete ::+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasklistsDelete+newTasksTasklistsDelete tasklist =+  TasksTasklistsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasklistsDelete where+  type Rs TasksTasklistsDelete = ()+  type Scopes TasksTasklistsDelete = '[Tasks'FullControl]+  requestClient TasksTasklistsDelete {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasklistsDeleteResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Tasklists/Get.hs view
@@ -0,0 +1,113 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Tasklists.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the authenticated user\'s specified task list.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasklists.get@.+module Gogol.AppsTasks.Tasks.Tasklists.Get+  ( -- * Resource+    TasksTasklistsGetResource,++    -- ** Constructing a Request+    TasksTasklistsGet (..),+    newTasksTasklistsGet,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasklists.get@ method which the+-- 'TasksTasklistsGet' request conforms to.+type TasksTasklistsGetResource =+  "tasks"+    Core.:> "v1"+    Core.:> "users"+    Core.:> "@me"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] TaskList++-- | Returns the authenticated user\'s specified task list.+--+-- /See:/ 'newTasksTasklistsGet' smart constructor.+data TasksTasklistsGet = TasksTasklistsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasklistsGet' with the minimum fields required to make a request.+newTasksTasklistsGet ::+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasklistsGet+newTasksTasklistsGet tasklist =+  TasksTasklistsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasklistsGet where+  type Rs TasksTasklistsGet = TaskList+  type+    Scopes TasksTasklistsGet =+      '[Tasks'FullControl, Tasks'Readonly]+  requestClient TasksTasklistsGet {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasklistsGetResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Tasklists/Insert.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Tasklists.Insert+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a new task list and adds it to the authenticated user\'s task lists. A user can have up to 2000 lists at a time.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasklists.insert@.+module Gogol.AppsTasks.Tasks.Tasklists.Insert+  ( -- * Resource+    TasksTasklistsInsertResource,++    -- ** Constructing a Request+    TasksTasklistsInsert (..),+    newTasksTasklistsInsert,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasklists.insert@ method which the+-- 'TasksTasklistsInsert' request conforms to.+type TasksTasklistsInsertResource =+  "tasks"+    Core.:> "v1"+    Core.:> "users"+    Core.:> "@me"+    Core.:> "lists"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] TaskList+    Core.:> Core.Post '[Core.JSON] TaskList++-- | Creates a new task list and adds it to the authenticated user\'s task lists. A user can have up to 2000 lists at a time.+--+-- /See:/ 'newTasksTasklistsInsert' smart constructor.+data TasksTasklistsInsert = TasksTasklistsInsert+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: TaskList,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasklistsInsert' with the minimum fields required to make a request.+newTasksTasklistsInsert ::+  -- |  Multipart request metadata. See 'payload'.+  TaskList ->+  TasksTasklistsInsert+newTasksTasklistsInsert payload =+  TasksTasklistsInsert+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasklistsInsert where+  type Rs TasksTasklistsInsert = TaskList+  type Scopes TasksTasklistsInsert = '[Tasks'FullControl]+  requestClient TasksTasklistsInsert {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasklistsInsertResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Tasklists/List.hs view
@@ -0,0 +1,116 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Tasklists.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns all the authenticated user\'s task lists. A user can have up to 2000 lists at a time.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasklists.list@.+module Gogol.AppsTasks.Tasks.Tasklists.List+  ( -- * Resource+    TasksTasklistsListResource,++    -- ** Constructing a Request+    TasksTasklistsList (..),+    newTasksTasklistsList,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasklists.list@ method which the+-- 'TasksTasklistsList' request conforms to.+type TasksTasklistsListResource =+  "tasks"+    Core.:> "v1"+    Core.:> "users"+    Core.:> "@me"+    Core.:> "lists"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "maxResults" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] TaskLists++-- | Returns all the authenticated user\'s task lists. A user can have up to 2000 lists at a time.+--+-- /See:/ 'newTasksTasklistsList' smart constructor.+data TasksTasklistsList = TasksTasklistsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Maximum number of task lists returned on one page. Optional. The default is 1000 (max allowed: 1000).+    maxResults :: (Core.Maybe Core.Int32),+    -- | Token specifying the result page to return. Optional.+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasklistsList' with the minimum fields required to make a request.+newTasksTasklistsList ::+  TasksTasklistsList+newTasksTasklistsList =+  TasksTasklistsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      maxResults = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasklistsList where+  type Rs TasksTasklistsList = TaskLists+  type+    Scopes TasksTasklistsList =+      '[Tasks'FullControl, Tasks'Readonly]+  requestClient TasksTasklistsList {..} =+    go+      xgafv+      accessToken+      callback+      maxResults+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasklistsListResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Tasklists/Patch.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Tasklists.Patch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the authenticated user\'s specified task list. This method supports patch semantics.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasklists.patch@.+module Gogol.AppsTasks.Tasks.Tasklists.Patch+  ( -- * Resource+    TasksTasklistsPatchResource,++    -- ** Constructing a Request+    TasksTasklistsPatch (..),+    newTasksTasklistsPatch,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasklists.patch@ method which the+-- 'TasksTasklistsPatch' request conforms to.+type TasksTasklistsPatchResource =+  "tasks"+    Core.:> "v1"+    Core.:> "users"+    Core.:> "@me"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] TaskList+    Core.:> Core.Patch '[Core.JSON] TaskList++-- | Updates the authenticated user\'s specified task list. This method supports patch semantics.+--+-- /See:/ 'newTasksTasklistsPatch' smart constructor.+data TasksTasklistsPatch = TasksTasklistsPatch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: TaskList,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasklistsPatch' with the minimum fields required to make a request.+newTasksTasklistsPatch ::+  -- |  Multipart request metadata. See 'payload'.+  TaskList ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasklistsPatch+newTasksTasklistsPatch payload tasklist =+  TasksTasklistsPatch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasklistsPatch where+  type Rs TasksTasklistsPatch = TaskList+  type Scopes TasksTasklistsPatch = '[Tasks'FullControl]+  requestClient TasksTasklistsPatch {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasklistsPatchResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Tasklists/Update.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Tasklists.Update+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the authenticated user\'s specified task list.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasklists.update@.+module Gogol.AppsTasks.Tasks.Tasklists.Update+  ( -- * Resource+    TasksTasklistsUpdateResource,++    -- ** Constructing a Request+    TasksTasklistsUpdate (..),+    newTasksTasklistsUpdate,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasklists.update@ method which the+-- 'TasksTasklistsUpdate' request conforms to.+type TasksTasklistsUpdateResource =+  "tasks"+    Core.:> "v1"+    Core.:> "users"+    Core.:> "@me"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] TaskList+    Core.:> Core.Put '[Core.JSON] TaskList++-- | Updates the authenticated user\'s specified task list.+--+-- /See:/ 'newTasksTasklistsUpdate' smart constructor.+data TasksTasklistsUpdate = TasksTasklistsUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: TaskList,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasklistsUpdate' with the minimum fields required to make a request.+newTasksTasklistsUpdate ::+  -- |  Multipart request metadata. See 'payload'.+  TaskList ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasklistsUpdate+newTasksTasklistsUpdate payload tasklist =+  TasksTasklistsUpdate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasklistsUpdate where+  type Rs TasksTasklistsUpdate = TaskList+  type Scopes TasksTasklistsUpdate = '[Tasks'FullControl]+  requestClient TasksTasklistsUpdate {..} =+    go+      tasklist+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasklistsUpdateResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Tasks/Update.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Tasks.Update+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the specified task.+--+-- /See:/ <https://developers.google.com/tasks/ Google Tasks API Reference> for @tasks.tasks.update@.+module Gogol.AppsTasks.Tasks.Update+  ( -- * Resource+    TasksTasksUpdateResource,++    -- ** Constructing a Request+    TasksTasksUpdate (..),+    newTasksTasksUpdate,+  )+where++import Gogol.AppsTasks.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @tasks.tasks.update@ method which the+-- 'TasksTasksUpdate' request conforms to.+type TasksTasksUpdateResource =+  "tasks"+    Core.:> "v1"+    Core.:> "lists"+    Core.:> Core.Capture "tasklist" Core.Text+    Core.:> "tasks"+    Core.:> Core.Capture "task" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Task+    Core.:> Core.Put '[Core.JSON] Task++-- | Updates the specified task.+--+-- /See:/ 'newTasksTasksUpdate' smart constructor.+data TasksTasksUpdate = TasksTasksUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: Task,+    -- | Task identifier.+    task :: Core.Text,+    -- | Task list identifier.+    tasklist :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TasksTasksUpdate' with the minimum fields required to make a request.+newTasksTasksUpdate ::+  -- |  Multipart request metadata. See 'payload'.+  Task ->+  -- |  Task identifier. See 'task'.+  Core.Text ->+  -- |  Task list identifier. See 'tasklist'.+  Core.Text ->+  TasksTasksUpdate+newTasksTasksUpdate payload task tasklist =+  TasksTasksUpdate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      task = task,+      tasklist = tasklist,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest TasksTasksUpdate where+  type Rs TasksTasksUpdate = Task+  type Scopes TasksTasksUpdate = '[Tasks'FullControl]+  requestClient TasksTasksUpdate {..} =+    go+      tasklist+      task+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      appsTasksService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy TasksTasksUpdateResource)+          Core.mempty
+ gen/Gogol/AppsTasks/Types.hs view
@@ -0,0 +1,92 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.AppsTasks.Types+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.AppsTasks.Types+  ( -- * Configuration+    appsTasksService,++    -- * OAuth Scopes+    Tasks'FullControl,+    Tasks'Readonly,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** AssignmentInfo+    AssignmentInfo (..),+    newAssignmentInfo,++    -- ** AssignmentInfo_SurfaceType+    AssignmentInfo_SurfaceType (..),++    -- ** DriveResourceInfo+    DriveResourceInfo (..),+    newDriveResourceInfo,++    -- ** SpaceInfo+    SpaceInfo (..),+    newSpaceInfo,++    -- ** Task+    Task (..),+    newTask,++    -- ** Task_LinksItem+    Task_LinksItem (..),+    newTask_LinksItem,++    -- ** TaskList+    TaskList (..),+    newTaskList,++    -- ** TaskLists+    TaskLists (..),+    newTaskLists,++    -- ** Tasks+    Tasks (..),+    newTasks,+  )+where++import Gogol.AppsTasks.Internal.Product+import Gogol.AppsTasks.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v1@ of the Google Tasks API. This contains the host and root path used as a starting point for constructing service requests.+appsTasksService :: Core.ServiceConfig+appsTasksService =+  Core.defaultService+    (Core.ServiceId "tasks:v1")+    "tasks.googleapis.com"++-- | Create, edit, organize, and delete all your tasks+type Tasks'FullControl = "https://www.googleapis.com/auth/tasks"++-- | View your tasks+type Tasks'Readonly =+  "https://www.googleapis.com/auth/tasks.readonly"
− gen/Network/Google/AppsTasks.hs 
@@ -1,165 +0,0 @@-{-# LANGUAGE DataKinds         #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators     #-}--{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module      : Network.Google.AppsTasks--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Manages your tasks and task lists.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference>-module Network.Google.AppsTasks-    (-    -- * Service Configuration-      appsTasksService--    -- * OAuth Scopes-    , tasksReadOnlyScope-    , tasksScope--    -- * API Declaration-    , AppsTasksAPI--    -- * Resources--    -- ** tasks.tasklists.delete-    , module Network.Google.Resource.Tasks.TaskLists.Delete--    -- ** tasks.tasklists.get-    , module Network.Google.Resource.Tasks.TaskLists.Get--    -- ** tasks.tasklists.insert-    , module Network.Google.Resource.Tasks.TaskLists.Insert--    -- ** tasks.tasklists.list-    , module Network.Google.Resource.Tasks.TaskLists.List--    -- ** tasks.tasklists.patch-    , module Network.Google.Resource.Tasks.TaskLists.Patch--    -- ** tasks.tasklists.update-    , module Network.Google.Resource.Tasks.TaskLists.Update--    -- ** tasks.tasks.clear-    , module Network.Google.Resource.Tasks.Tasks.Clear--    -- ** tasks.tasks.delete-    , module Network.Google.Resource.Tasks.Tasks.Delete--    -- ** tasks.tasks.get-    , module Network.Google.Resource.Tasks.Tasks.Get--    -- ** tasks.tasks.insert-    , module Network.Google.Resource.Tasks.Tasks.Insert--    -- ** tasks.tasks.list-    , module Network.Google.Resource.Tasks.Tasks.List--    -- ** tasks.tasks.move-    , module Network.Google.Resource.Tasks.Tasks.Move--    -- ** tasks.tasks.patch-    , module Network.Google.Resource.Tasks.Tasks.Patch--    -- ** tasks.tasks.update-    , module Network.Google.Resource.Tasks.Tasks.Update--    -- * Types--    -- ** TaskLinksItem-    , TaskLinksItem-    , taskLinksItem-    , tliLink-    , tliType-    , tliDescription--    -- ** Tasks-    , Tasks-    , tasks-    , tEtag-    , tNextPageToken-    , tKind-    , tItems--    -- ** TaskLists-    , TaskLists-    , taskLists-    , tlEtag-    , tlNextPageToken-    , tlKind-    , tlItems--    -- ** TaskList-    , TaskList-    , taskList-    , tasEtag-    , tasKind-    , tasSelfLink-    , tasId-    , tasUpdated-    , tasTitle--    -- ** Task-    , Task-    , task-    , ttParent-    , ttStatus-    , ttDue-    , ttEtag-    , ttKind-    , ttSelfLink-    , ttHidden-    , ttCompleted-    , ttId-    , ttDeleted-    , ttUpdated-    , ttTitle-    , ttLinks-    , ttNotes-    , ttPosition-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude-import           Network.Google.Resource.Tasks.TaskLists.Delete-import           Network.Google.Resource.Tasks.TaskLists.Get-import           Network.Google.Resource.Tasks.TaskLists.Insert-import           Network.Google.Resource.Tasks.TaskLists.List-import           Network.Google.Resource.Tasks.TaskLists.Patch-import           Network.Google.Resource.Tasks.TaskLists.Update-import           Network.Google.Resource.Tasks.Tasks.Clear-import           Network.Google.Resource.Tasks.Tasks.Delete-import           Network.Google.Resource.Tasks.Tasks.Get-import           Network.Google.Resource.Tasks.Tasks.Insert-import           Network.Google.Resource.Tasks.Tasks.List-import           Network.Google.Resource.Tasks.Tasks.Move-import           Network.Google.Resource.Tasks.Tasks.Patch-import           Network.Google.Resource.Tasks.Tasks.Update--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Tasks API service.-type AppsTasksAPI =-     TasksInsertResource :<|> TasksListResource :<|>-       TasksPatchResource-       :<|> TasksGetResource-       :<|> TasksClearResource-       :<|> TasksDeleteResource-       :<|> TasksUpdateResource-       :<|> TasksMoveResource-       :<|> TaskListsInsertResource-       :<|> TaskListsListResource-       :<|> TaskListsPatchResource-       :<|> TaskListsGetResource-       :<|> TaskListsDeleteResource-       :<|> TaskListsUpdateResource
− gen/Network/Google/AppsTasks/Types.hs 
@@ -1,95 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.AppsTasks.Types--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.AppsTasks.Types-    (-    -- * Service Configuration-      appsTasksService--    -- * OAuth Scopes-    , tasksReadOnlyScope-    , tasksScope--    -- * TaskLinksItem-    , TaskLinksItem-    , taskLinksItem-    , tliLink-    , tliType-    , tliDescription--    -- * Tasks-    , Tasks-    , tasks-    , tEtag-    , tNextPageToken-    , tKind-    , tItems--    -- * TaskLists-    , TaskLists-    , taskLists-    , tlEtag-    , tlNextPageToken-    , tlKind-    , tlItems--    -- * TaskList-    , TaskList-    , taskList-    , tasEtag-    , tasKind-    , tasSelfLink-    , tasId-    , tasUpdated-    , tasTitle--    -- * Task-    , Task-    , task-    , ttParent-    , ttStatus-    , ttDue-    , ttEtag-    , ttKind-    , ttSelfLink-    , ttHidden-    , ttCompleted-    , ttId-    , ttDeleted-    , ttUpdated-    , ttTitle-    , ttLinks-    , ttNotes-    , ttPosition-    ) where--import           Network.Google.AppsTasks.Types.Product-import           Network.Google.AppsTasks.Types.Sum-import           Network.Google.Prelude---- | Default request referring to version 'v1' of the Tasks API. This contains the host and root path used as a starting point for constructing service requests.-appsTasksService :: ServiceConfig-appsTasksService-  = defaultService (ServiceId "tasks:v1")-      "www.googleapis.com"---- | View your tasks-tasksReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/tasks.readonly"]-tasksReadOnlyScope = Proxy---- | Create, edit, organize, and delete all your tasks-tasksScope :: Proxy '["https://www.googleapis.com/auth/tasks"]-tasksScope = Proxy
− gen/Network/Google/AppsTasks/Types/Product.hs 
@@ -1,506 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}--{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.AppsTasks.Types.Product--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.AppsTasks.Types.Product where--import           Network.Google.AppsTasks.Types.Sum-import           Network.Google.Prelude------- /See:/ 'taskLinksItem' smart constructor.-data TaskLinksItem =-  TaskLinksItem'-    { _tliLink        :: !(Maybe Text)-    , _tliType        :: !(Maybe Text)-    , _tliDescription :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskLinksItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tliLink'------ * 'tliType'------ * 'tliDescription'-taskLinksItem-    :: TaskLinksItem-taskLinksItem =-  TaskLinksItem'-    {_tliLink = Nothing, _tliType = Nothing, _tliDescription = Nothing}----- | The URL.-tliLink :: Lens' TaskLinksItem (Maybe Text)-tliLink = lens _tliLink (\ s a -> s{_tliLink = a})---- | Type of the link, e.g. \"email\".-tliType :: Lens' TaskLinksItem (Maybe Text)-tliType = lens _tliType (\ s a -> s{_tliType = a})---- | The description. In HTML speak: Everything between and .-tliDescription :: Lens' TaskLinksItem (Maybe Text)-tliDescription-  = lens _tliDescription-      (\ s a -> s{_tliDescription = a})--instance FromJSON TaskLinksItem where-        parseJSON-          = withObject "TaskLinksItem"-              (\ o ->-                 TaskLinksItem' <$>-                   (o .:? "link") <*> (o .:? "type") <*>-                     (o .:? "description"))--instance ToJSON TaskLinksItem where-        toJSON TaskLinksItem'{..}-          = object-              (catMaybes-                 [("link" .=) <$> _tliLink, ("type" .=) <$> _tliType,-                  ("description" .=) <$> _tliDescription])------- /See:/ 'tasks' smart constructor.-data Tasks =-  Tasks'-    { _tEtag          :: !(Maybe Text)-    , _tNextPageToken :: !(Maybe Text)-    , _tKind          :: !Text-    , _tItems         :: !(Maybe [Task])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Tasks' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tEtag'------ * 'tNextPageToken'------ * 'tKind'------ * 'tItems'-tasks-    :: Tasks-tasks =-  Tasks'-    { _tEtag = Nothing-    , _tNextPageToken = Nothing-    , _tKind = "tasks#tasks"-    , _tItems = Nothing-    }----- | ETag of the resource.-tEtag :: Lens' Tasks (Maybe Text)-tEtag = lens _tEtag (\ s a -> s{_tEtag = a})---- | Token used to access the next page of this result.-tNextPageToken :: Lens' Tasks (Maybe Text)-tNextPageToken-  = lens _tNextPageToken-      (\ s a -> s{_tNextPageToken = a})---- | Type of the resource. This is always \"tasks#tasks\".-tKind :: Lens' Tasks Text-tKind = lens _tKind (\ s a -> s{_tKind = a})---- | Collection of tasks.-tItems :: Lens' Tasks [Task]-tItems-  = lens _tItems (\ s a -> s{_tItems = a}) . _Default .-      _Coerce--instance FromJSON Tasks where-        parseJSON-          = withObject "Tasks"-              (\ o ->-                 Tasks' <$>-                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "tasks#tasks")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON Tasks where-        toJSON Tasks'{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _tEtag,-                  ("nextPageToken" .=) <$> _tNextPageToken,-                  Just ("kind" .= _tKind), ("items" .=) <$> _tItems])------- /See:/ 'taskLists' smart constructor.-data TaskLists =-  TaskLists'-    { _tlEtag          :: !(Maybe Text)-    , _tlNextPageToken :: !(Maybe Text)-    , _tlKind          :: !Text-    , _tlItems         :: !(Maybe [TaskList])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskLists' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tlEtag'------ * 'tlNextPageToken'------ * 'tlKind'------ * 'tlItems'-taskLists-    :: TaskLists-taskLists =-  TaskLists'-    { _tlEtag = Nothing-    , _tlNextPageToken = Nothing-    , _tlKind = "tasks#taskLists"-    , _tlItems = Nothing-    }----- | ETag of the resource.-tlEtag :: Lens' TaskLists (Maybe Text)-tlEtag = lens _tlEtag (\ s a -> s{_tlEtag = a})---- | Token that can be used to request the next page of this result.-tlNextPageToken :: Lens' TaskLists (Maybe Text)-tlNextPageToken-  = lens _tlNextPageToken-      (\ s a -> s{_tlNextPageToken = a})---- | Type of the resource. This is always \"tasks#taskLists\".-tlKind :: Lens' TaskLists Text-tlKind = lens _tlKind (\ s a -> s{_tlKind = a})---- | Collection of task lists.-tlItems :: Lens' TaskLists [TaskList]-tlItems-  = lens _tlItems (\ s a -> s{_tlItems = a}) . _Default-      . _Coerce--instance FromJSON TaskLists where-        parseJSON-          = withObject "TaskLists"-              (\ o ->-                 TaskLists' <$>-                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "tasks#taskLists")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON TaskLists where-        toJSON TaskLists'{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _tlEtag,-                  ("nextPageToken" .=) <$> _tlNextPageToken,-                  Just ("kind" .= _tlKind), ("items" .=) <$> _tlItems])------- /See:/ 'taskList' smart constructor.-data TaskList =-  TaskList'-    { _tasEtag     :: !(Maybe Text)-    , _tasKind     :: !Text-    , _tasSelfLink :: !(Maybe Text)-    , _tasId       :: !(Maybe Text)-    , _tasUpdated  :: !(Maybe DateTime')-    , _tasTitle    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tasEtag'------ * 'tasKind'------ * 'tasSelfLink'------ * 'tasId'------ * 'tasUpdated'------ * 'tasTitle'-taskList-    :: TaskList-taskList =-  TaskList'-    { _tasEtag = Nothing-    , _tasKind = "tasks#taskList"-    , _tasSelfLink = Nothing-    , _tasId = Nothing-    , _tasUpdated = Nothing-    , _tasTitle = Nothing-    }----- | ETag of the resource.-tasEtag :: Lens' TaskList (Maybe Text)-tasEtag = lens _tasEtag (\ s a -> s{_tasEtag = a})---- | Type of the resource. This is always \"tasks#taskList\".-tasKind :: Lens' TaskList Text-tasKind = lens _tasKind (\ s a -> s{_tasKind = a})---- | URL pointing to this task list. Used to retrieve, update, or delete this--- task list.-tasSelfLink :: Lens' TaskList (Maybe Text)-tasSelfLink-  = lens _tasSelfLink (\ s a -> s{_tasSelfLink = a})---- | Task list identifier.-tasId :: Lens' TaskList (Maybe Text)-tasId = lens _tasId (\ s a -> s{_tasId = a})---- | Last modification time of the task list (as a RFC 3339 timestamp).-tasUpdated :: Lens' TaskList (Maybe UTCTime)-tasUpdated-  = lens _tasUpdated (\ s a -> s{_tasUpdated = a}) .-      mapping _DateTime---- | Title of the task list.-tasTitle :: Lens' TaskList (Maybe Text)-tasTitle = lens _tasTitle (\ s a -> s{_tasTitle = a})--instance FromJSON TaskList where-        parseJSON-          = withObject "TaskList"-              (\ o ->-                 TaskList' <$>-                   (o .:? "etag") <*>-                     (o .:? "kind" .!= "tasks#taskList")-                     <*> (o .:? "selfLink")-                     <*> (o .:? "id")-                     <*> (o .:? "updated")-                     <*> (o .:? "title"))--instance ToJSON TaskList where-        toJSON TaskList'{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _tasEtag, Just ("kind" .= _tasKind),-                  ("selfLink" .=) <$> _tasSelfLink,-                  ("id" .=) <$> _tasId, ("updated" .=) <$> _tasUpdated,-                  ("title" .=) <$> _tasTitle])------- /See:/ 'task' smart constructor.-data Task =-  Task'-    { _ttParent    :: !(Maybe Text)-    , _ttStatus    :: !(Maybe Text)-    , _ttDue       :: !(Maybe DateTime')-    , _ttEtag      :: !(Maybe Text)-    , _ttKind      :: !Text-    , _ttSelfLink  :: !(Maybe Text)-    , _ttHidden    :: !(Maybe Bool)-    , _ttCompleted :: !(Maybe DateTime')-    , _ttId        :: !(Maybe Text)-    , _ttDeleted   :: !(Maybe Bool)-    , _ttUpdated   :: !(Maybe DateTime')-    , _ttTitle     :: !(Maybe Text)-    , _ttLinks     :: !(Maybe [TaskLinksItem])-    , _ttNotes     :: !(Maybe Text)-    , _ttPosition  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Task' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ttParent'------ * 'ttStatus'------ * 'ttDue'------ * 'ttEtag'------ * 'ttKind'------ * 'ttSelfLink'------ * 'ttHidden'------ * 'ttCompleted'------ * 'ttId'------ * 'ttDeleted'------ * 'ttUpdated'------ * 'ttTitle'------ * 'ttLinks'------ * 'ttNotes'------ * 'ttPosition'-task-    :: Task-task =-  Task'-    { _ttParent = Nothing-    , _ttStatus = Nothing-    , _ttDue = Nothing-    , _ttEtag = Nothing-    , _ttKind = "tasks#task"-    , _ttSelfLink = Nothing-    , _ttHidden = Nothing-    , _ttCompleted = Nothing-    , _ttId = Nothing-    , _ttDeleted = Nothing-    , _ttUpdated = Nothing-    , _ttTitle = Nothing-    , _ttLinks = Nothing-    , _ttNotes = Nothing-    , _ttPosition = Nothing-    }----- | Parent task identifier. This field is omitted if it is a top-level task.--- This field is read-only. Use the \"move\" method to move the task under--- a different parent or to the top level.-ttParent :: Lens' Task (Maybe Text)-ttParent = lens _ttParent (\ s a -> s{_ttParent = a})---- | Status of the task. This is either \"needsAction\" or \"completed\".-ttStatus :: Lens' Task (Maybe Text)-ttStatus = lens _ttStatus (\ s a -> s{_ttStatus = a})---- | Due date of the task (as a RFC 3339 timestamp). Optional.-ttDue :: Lens' Task (Maybe UTCTime)-ttDue-  = lens _ttDue (\ s a -> s{_ttDue = a}) .-      mapping _DateTime---- | ETag of the resource.-ttEtag :: Lens' Task (Maybe Text)-ttEtag = lens _ttEtag (\ s a -> s{_ttEtag = a})---- | Type of the resource. This is always \"tasks#task\".-ttKind :: Lens' Task Text-ttKind = lens _ttKind (\ s a -> s{_ttKind = a})---- | URL pointing to this task. Used to retrieve, update, or delete this--- task.-ttSelfLink :: Lens' Task (Maybe Text)-ttSelfLink-  = lens _ttSelfLink (\ s a -> s{_ttSelfLink = a})---- | Flag indicating whether the task is hidden. This is the case if the task--- had been marked completed when the task list was last cleared. The--- default is False. This field is read-only.-ttHidden :: Lens' Task (Maybe Bool)-ttHidden = lens _ttHidden (\ s a -> s{_ttHidden = a})---- | Completion date of the task (as a RFC 3339 timestamp). This field is--- omitted if the task has not been completed.-ttCompleted :: Lens' Task (Maybe UTCTime)-ttCompleted-  = lens _ttCompleted (\ s a -> s{_ttCompleted = a}) .-      mapping _DateTime---- | Task identifier.-ttId :: Lens' Task (Maybe Text)-ttId = lens _ttId (\ s a -> s{_ttId = a})---- | Flag indicating whether the task has been deleted. The default if False.-ttDeleted :: Lens' Task (Maybe Bool)-ttDeleted-  = lens _ttDeleted (\ s a -> s{_ttDeleted = a})---- | Last modification time of the task (as a RFC 3339 timestamp).-ttUpdated :: Lens' Task (Maybe UTCTime)-ttUpdated-  = lens _ttUpdated (\ s a -> s{_ttUpdated = a}) .-      mapping _DateTime---- | Title of the task.-ttTitle :: Lens' Task (Maybe Text)-ttTitle = lens _ttTitle (\ s a -> s{_ttTitle = a})---- | Collection of links. This collection is read-only.-ttLinks :: Lens' Task [TaskLinksItem]-ttLinks-  = lens _ttLinks (\ s a -> s{_ttLinks = a}) . _Default-      . _Coerce---- | Notes describing the task. Optional.-ttNotes :: Lens' Task (Maybe Text)-ttNotes = lens _ttNotes (\ s a -> s{_ttNotes = a})---- | String indicating the position of the task among its sibling tasks under--- the same parent task or at the top level. If this string is greater than--- another task\'s corresponding position string according to--- lexicographical ordering, the task is positioned after the other task--- under the same parent task (or at the top level). This field is--- read-only. Use the \"move\" method to move the task to another position.-ttPosition :: Lens' Task (Maybe Text)-ttPosition-  = lens _ttPosition (\ s a -> s{_ttPosition = a})--instance FromJSON Task where-        parseJSON-          = withObject "Task"-              (\ o ->-                 Task' <$>-                   (o .:? "parent") <*> (o .:? "status") <*>-                     (o .:? "due")-                     <*> (o .:? "etag")-                     <*> (o .:? "kind" .!= "tasks#task")-                     <*> (o .:? "selfLink")-                     <*> (o .:? "hidden")-                     <*> (o .:? "completed")-                     <*> (o .:? "id")-                     <*> (o .:? "deleted")-                     <*> (o .:? "updated")-                     <*> (o .:? "title")-                     <*> (o .:? "links" .!= mempty)-                     <*> (o .:? "notes")-                     <*> (o .:? "position"))--instance ToJSON Task where-        toJSON Task'{..}-          = object-              (catMaybes-                 [("parent" .=) <$> _ttParent,-                  ("status" .=) <$> _ttStatus, ("due" .=) <$> _ttDue,-                  ("etag" .=) <$> _ttEtag, Just ("kind" .= _ttKind),-                  ("selfLink" .=) <$> _ttSelfLink,-                  ("hidden" .=) <$> _ttHidden,-                  ("completed" .=) <$> _ttCompleted,-                  ("id" .=) <$> _ttId, ("deleted" .=) <$> _ttDeleted,-                  ("updated" .=) <$> _ttUpdated,-                  ("title" .=) <$> _ttTitle, ("links" .=) <$> _ttLinks,-                  ("notes" .=) <$> _ttNotes,-                  ("position" .=) <$> _ttPosition])
− gen/Network/Google/AppsTasks/Types/Sum.hs 
@@ -1,19 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.AppsTasks.Types.Sum--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.AppsTasks.Types.Sum where--import           Network.Google.Prelude hiding (Bytes)
− gen/Network/Google/Resource/Tasks/TaskLists/Delete.hs 
@@ -1,88 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.TaskLists.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the authenticated user\'s specified task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasklists.delete@.-module Network.Google.Resource.Tasks.TaskLists.Delete-    (-    -- * REST Resource-      TaskListsDeleteResource--    -- * Creating a Request-    , taskListsDelete-    , TaskListsDelete--    -- * Request Lenses-    , tldTaskList-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasklists.delete@ method which the--- 'TaskListsDelete' request conforms to.-type TaskListsDeleteResource =-     "tasks" :>-       "v1" :>-         "users" :>-           "@me" :>-             "lists" :>-               Capture "tasklist" Text :>-                 QueryParam "alt" AltJSON :> Delete '[JSON] ()---- | Deletes the authenticated user\'s specified task list.------ /See:/ 'taskListsDelete' smart constructor.-newtype TaskListsDelete =-  TaskListsDelete'-    { _tldTaskList :: Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskListsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tldTaskList'-taskListsDelete-    :: Text -- ^ 'tldTaskList'-    -> TaskListsDelete-taskListsDelete pTldTaskList_ = TaskListsDelete' {_tldTaskList = pTldTaskList_}----- | Task list identifier.-tldTaskList :: Lens' TaskListsDelete Text-tldTaskList-  = lens _tldTaskList (\ s a -> s{_tldTaskList = a})--instance GoogleRequest TaskListsDelete where-        type Rs TaskListsDelete = ()-        type Scopes TaskListsDelete =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TaskListsDelete'{..}-          = go _tldTaskList (Just AltJSON) appsTasksService-          where go-                  = buildClient-                      (Proxy :: Proxy TaskListsDeleteResource)-                      mempty
− gen/Network/Google/Resource/Tasks/TaskLists/Get.hs 
@@ -1,88 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.TaskLists.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns the authenticated user\'s specified task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasklists.get@.-module Network.Google.Resource.Tasks.TaskLists.Get-    (-    -- * REST Resource-      TaskListsGetResource--    -- * Creating a Request-    , taskListsGet-    , TaskListsGet--    -- * Request Lenses-    , tlgTaskList-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasklists.get@ method which the--- 'TaskListsGet' request conforms to.-type TaskListsGetResource =-     "tasks" :>-       "v1" :>-         "users" :>-           "@me" :>-             "lists" :>-               Capture "tasklist" Text :>-                 QueryParam "alt" AltJSON :> Get '[JSON] TaskList---- | Returns the authenticated user\'s specified task list.------ /See:/ 'taskListsGet' smart constructor.-newtype TaskListsGet =-  TaskListsGet'-    { _tlgTaskList :: Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskListsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tlgTaskList'-taskListsGet-    :: Text -- ^ 'tlgTaskList'-    -> TaskListsGet-taskListsGet pTlgTaskList_ = TaskListsGet' {_tlgTaskList = pTlgTaskList_}----- | Task list identifier.-tlgTaskList :: Lens' TaskListsGet Text-tlgTaskList-  = lens _tlgTaskList (\ s a -> s{_tlgTaskList = a})--instance GoogleRequest TaskListsGet where-        type Rs TaskListsGet = TaskList-        type Scopes TaskListsGet =-             '["https://www.googleapis.com/auth/tasks",-               "https://www.googleapis.com/auth/tasks.readonly"]-        requestClient TaskListsGet'{..}-          = go _tlgTaskList (Just AltJSON) appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TaskListsGetResource)-                      mempty
− gen/Network/Google/Resource/Tasks/TaskLists/Insert.hs 
@@ -1,90 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.TaskLists.Insert--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new task list and adds it to the authenticated user\'s task--- lists.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasklists.insert@.-module Network.Google.Resource.Tasks.TaskLists.Insert-    (-    -- * REST Resource-      TaskListsInsertResource--    -- * Creating a Request-    , taskListsInsert-    , TaskListsInsert--    -- * Request Lenses-    , tliPayload-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasklists.insert@ method which the--- 'TaskListsInsert' request conforms to.-type TaskListsInsertResource =-     "tasks" :>-       "v1" :>-         "users" :>-           "@me" :>-             "lists" :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] TaskList :> Post '[JSON] TaskList---- | Creates a new task list and adds it to the authenticated user\'s task--- lists.------ /See:/ 'taskListsInsert' smart constructor.-newtype TaskListsInsert =-  TaskListsInsert'-    { _tliPayload :: TaskList-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskListsInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tliPayload'-taskListsInsert-    :: TaskList -- ^ 'tliPayload'-    -> TaskListsInsert-taskListsInsert pTliPayload_ = TaskListsInsert' {_tliPayload = pTliPayload_}----- | Multipart request metadata.-tliPayload :: Lens' TaskListsInsert TaskList-tliPayload-  = lens _tliPayload (\ s a -> s{_tliPayload = a})--instance GoogleRequest TaskListsInsert where-        type Rs TaskListsInsert = TaskList-        type Scopes TaskListsInsert =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TaskListsInsert'{..}-          = go (Just AltJSON) _tliPayload appsTasksService-          where go-                  = buildClient-                      (Proxy :: Proxy TaskListsInsertResource)-                      mempty
− gen/Network/Google/Resource/Tasks/TaskLists/List.hs 
@@ -1,102 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.TaskLists.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns all the authenticated user\'s task lists.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasklists.list@.-module Network.Google.Resource.Tasks.TaskLists.List-    (-    -- * REST Resource-      TaskListsListResource--    -- * Creating a Request-    , taskListsList-    , TaskListsList--    -- * Request Lenses-    , tllPageToken-    , tllMaxResults-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasklists.list@ method which the--- 'TaskListsList' request conforms to.-type TaskListsListResource =-     "tasks" :>-       "v1" :>-         "users" :>-           "@me" :>-             "lists" :>-               QueryParam "pageToken" Text :>-                 QueryParam "maxResults" (Textual Int64) :>-                   QueryParam "alt" AltJSON :> Get '[JSON] TaskLists---- | Returns all the authenticated user\'s task lists.------ /See:/ 'taskListsList' smart constructor.-data TaskListsList =-  TaskListsList'-    { _tllPageToken  :: !(Maybe Text)-    , _tllMaxResults :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskListsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tllPageToken'------ * 'tllMaxResults'-taskListsList-    :: TaskListsList-taskListsList =-  TaskListsList' {_tllPageToken = Nothing, _tllMaxResults = Nothing}----- | Token specifying the result page to return. Optional.-tllPageToken :: Lens' TaskListsList (Maybe Text)-tllPageToken-  = lens _tllPageToken (\ s a -> s{_tllPageToken = a})---- | Maximum number of task lists returned on one page. Optional. The default--- is 20 (max allowed: 100).-tllMaxResults :: Lens' TaskListsList (Maybe Int64)-tllMaxResults-  = lens _tllMaxResults-      (\ s a -> s{_tllMaxResults = a})-      . mapping _Coerce--instance GoogleRequest TaskListsList where-        type Rs TaskListsList = TaskLists-        type Scopes TaskListsList =-             '["https://www.googleapis.com/auth/tasks",-               "https://www.googleapis.com/auth/tasks.readonly"]-        requestClient TaskListsList'{..}-          = go _tllPageToken _tllMaxResults (Just AltJSON)-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TaskListsListResource)-                      mempty
− gen/Network/Google/Resource/Tasks/TaskLists/Patch.hs 
@@ -1,102 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.TaskLists.Patch--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the authenticated user\'s specified task list. This method--- supports patch semantics.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasklists.patch@.-module Network.Google.Resource.Tasks.TaskLists.Patch-    (-    -- * REST Resource-      TaskListsPatchResource--    -- * Creating a Request-    , taskListsPatch-    , TaskListsPatch--    -- * Request Lenses-    , tlpPayload-    , tlpTaskList-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasklists.patch@ method which the--- 'TaskListsPatch' request conforms to.-type TaskListsPatchResource =-     "tasks" :>-       "v1" :>-         "users" :>-           "@me" :>-             "lists" :>-               Capture "tasklist" Text :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] TaskList :> Patch '[JSON] TaskList---- | Updates the authenticated user\'s specified task list. This method--- supports patch semantics.------ /See:/ 'taskListsPatch' smart constructor.-data TaskListsPatch =-  TaskListsPatch'-    { _tlpPayload  :: !TaskList-    , _tlpTaskList :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskListsPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tlpPayload'------ * 'tlpTaskList'-taskListsPatch-    :: TaskList -- ^ 'tlpPayload'-    -> Text -- ^ 'tlpTaskList'-    -> TaskListsPatch-taskListsPatch pTlpPayload_ pTlpTaskList_ =-  TaskListsPatch' {_tlpPayload = pTlpPayload_, _tlpTaskList = pTlpTaskList_}----- | Multipart request metadata.-tlpPayload :: Lens' TaskListsPatch TaskList-tlpPayload-  = lens _tlpPayload (\ s a -> s{_tlpPayload = a})---- | Task list identifier.-tlpTaskList :: Lens' TaskListsPatch Text-tlpTaskList-  = lens _tlpTaskList (\ s a -> s{_tlpTaskList = a})--instance GoogleRequest TaskListsPatch where-        type Rs TaskListsPatch = TaskList-        type Scopes TaskListsPatch =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TaskListsPatch'{..}-          = go _tlpTaskList (Just AltJSON) _tlpPayload-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TaskListsPatchResource)-                      mempty
− gen/Network/Google/Resource/Tasks/TaskLists/Update.hs 
@@ -1,101 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.TaskLists.Update--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the authenticated user\'s specified task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasklists.update@.-module Network.Google.Resource.Tasks.TaskLists.Update-    (-    -- * REST Resource-      TaskListsUpdateResource--    -- * Creating a Request-    , taskListsUpdate-    , TaskListsUpdate--    -- * Request Lenses-    , tluPayload-    , tluTaskList-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasklists.update@ method which the--- 'TaskListsUpdate' request conforms to.-type TaskListsUpdateResource =-     "tasks" :>-       "v1" :>-         "users" :>-           "@me" :>-             "lists" :>-               Capture "tasklist" Text :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] TaskList :> Put '[JSON] TaskList---- | Updates the authenticated user\'s specified task list.------ /See:/ 'taskListsUpdate' smart constructor.-data TaskListsUpdate =-  TaskListsUpdate'-    { _tluPayload  :: !TaskList-    , _tluTaskList :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TaskListsUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tluPayload'------ * 'tluTaskList'-taskListsUpdate-    :: TaskList -- ^ 'tluPayload'-    -> Text -- ^ 'tluTaskList'-    -> TaskListsUpdate-taskListsUpdate pTluPayload_ pTluTaskList_ =-  TaskListsUpdate' {_tluPayload = pTluPayload_, _tluTaskList = pTluTaskList_}----- | Multipart request metadata.-tluPayload :: Lens' TaskListsUpdate TaskList-tluPayload-  = lens _tluPayload (\ s a -> s{_tluPayload = a})---- | Task list identifier.-tluTaskList :: Lens' TaskListsUpdate Text-tluTaskList-  = lens _tluTaskList (\ s a -> s{_tluTaskList = a})--instance GoogleRequest TaskListsUpdate where-        type Rs TaskListsUpdate = TaskList-        type Scopes TaskListsUpdate =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TaskListsUpdate'{..}-          = go _tluTaskList (Just AltJSON) _tluPayload-              appsTasksService-          where go-                  = buildClient-                      (Proxy :: Proxy TaskListsUpdateResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Clear.hs 
@@ -1,90 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Clear--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Clears all completed tasks from the specified task list. The affected--- tasks will be marked as \'hidden\' and no longer be returned by default--- when retrieving all tasks for a task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.clear@.-module Network.Google.Resource.Tasks.Tasks.Clear-    (-    -- * REST Resource-      TasksClearResource--    -- * Creating a Request-    , tasksClear-    , TasksClear--    -- * Request Lenses-    , tcTaskList-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.clear@ method which the--- 'TasksClear' request conforms to.-type TasksClearResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "clear" :>-               QueryParam "alt" AltJSON :> Post '[JSON] ()---- | Clears all completed tasks from the specified task list. The affected--- tasks will be marked as \'hidden\' and no longer be returned by default--- when retrieving all tasks for a task list.------ /See:/ 'tasksClear' smart constructor.-newtype TasksClear =-  TasksClear'-    { _tcTaskList :: Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksClear' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tcTaskList'-tasksClear-    :: Text -- ^ 'tcTaskList'-    -> TasksClear-tasksClear pTcTaskList_ = TasksClear' {_tcTaskList = pTcTaskList_}----- | Task list identifier.-tcTaskList :: Lens' TasksClear Text-tcTaskList-  = lens _tcTaskList (\ s a -> s{_tcTaskList = a})--instance GoogleRequest TasksClear where-        type Rs TasksClear = ()-        type Scopes TasksClear =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TasksClear'{..}-          = go _tcTaskList (Just AltJSON) appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksClearResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Delete.hs 
@@ -1,98 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the specified task from the task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.delete@.-module Network.Google.Resource.Tasks.Tasks.Delete-    (-    -- * REST Resource-      TasksDeleteResource--    -- * Creating a Request-    , tasksDelete-    , TasksDelete--    -- * Request Lenses-    , tdTaskList-    , tdTask-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.delete@ method which the--- 'TasksDelete' request conforms to.-type TasksDeleteResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               Capture "task" Text :>-                 QueryParam "alt" AltJSON :> Delete '[JSON] ()---- | Deletes the specified task from the task list.------ /See:/ 'tasksDelete' smart constructor.-data TasksDelete =-  TasksDelete'-    { _tdTaskList :: !Text-    , _tdTask     :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tdTaskList'------ * 'tdTask'-tasksDelete-    :: Text -- ^ 'tdTaskList'-    -> Text -- ^ 'tdTask'-    -> TasksDelete-tasksDelete pTdTaskList_ pTdTask_ =-  TasksDelete' {_tdTaskList = pTdTaskList_, _tdTask = pTdTask_}----- | Task list identifier.-tdTaskList :: Lens' TasksDelete Text-tdTaskList-  = lens _tdTaskList (\ s a -> s{_tdTaskList = a})---- | Task identifier.-tdTask :: Lens' TasksDelete Text-tdTask = lens _tdTask (\ s a -> s{_tdTask = a})--instance GoogleRequest TasksDelete where-        type Rs TasksDelete = ()-        type Scopes TasksDelete =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TasksDelete'{..}-          = go _tdTaskList _tdTask (Just AltJSON)-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksDeleteResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Get.hs 
@@ -1,99 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns the specified task.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.get@.-module Network.Google.Resource.Tasks.Tasks.Get-    (-    -- * REST Resource-      TasksGetResource--    -- * Creating a Request-    , tasksGet-    , TasksGet--    -- * Request Lenses-    , tgTaskList-    , tgTask-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.get@ method which the--- 'TasksGet' request conforms to.-type TasksGetResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               Capture "task" Text :>-                 QueryParam "alt" AltJSON :> Get '[JSON] Task---- | Returns the specified task.------ /See:/ 'tasksGet' smart constructor.-data TasksGet =-  TasksGet'-    { _tgTaskList :: !Text-    , _tgTask     :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tgTaskList'------ * 'tgTask'-tasksGet-    :: Text -- ^ 'tgTaskList'-    -> Text -- ^ 'tgTask'-    -> TasksGet-tasksGet pTgTaskList_ pTgTask_ =-  TasksGet' {_tgTaskList = pTgTaskList_, _tgTask = pTgTask_}----- | Task list identifier.-tgTaskList :: Lens' TasksGet Text-tgTaskList-  = lens _tgTaskList (\ s a -> s{_tgTaskList = a})---- | Task identifier.-tgTask :: Lens' TasksGet Text-tgTask = lens _tgTask (\ s a -> s{_tgTask = a})--instance GoogleRequest TasksGet where-        type Rs TasksGet = Task-        type Scopes TasksGet =-             '["https://www.googleapis.com/auth/tasks",-               "https://www.googleapis.com/auth/tasks.readonly"]-        requestClient TasksGet'{..}-          = go _tgTaskList _tgTask (Just AltJSON)-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksGetResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Insert.hs 
@@ -1,126 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Insert--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new task on the specified task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.insert@.-module Network.Google.Resource.Tasks.Tasks.Insert-    (-    -- * REST Resource-      TasksInsertResource--    -- * Creating a Request-    , tasksInsert-    , TasksInsert--    -- * Request Lenses-    , tiParent-    , tiPayload-    , tiTaskList-    , tiPrevious-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.insert@ method which the--- 'TasksInsert' request conforms to.-type TasksInsertResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               QueryParam "parent" Text :>-                 QueryParam "previous" Text :>-                   QueryParam "alt" AltJSON :>-                     ReqBody '[JSON] Task :> Post '[JSON] Task---- | Creates a new task on the specified task list.------ /See:/ 'tasksInsert' smart constructor.-data TasksInsert =-  TasksInsert'-    { _tiParent   :: !(Maybe Text)-    , _tiPayload  :: !Task-    , _tiTaskList :: !Text-    , _tiPrevious :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tiParent'------ * 'tiPayload'------ * 'tiTaskList'------ * 'tiPrevious'-tasksInsert-    :: Task -- ^ 'tiPayload'-    -> Text -- ^ 'tiTaskList'-    -> TasksInsert-tasksInsert pTiPayload_ pTiTaskList_ =-  TasksInsert'-    { _tiParent = Nothing-    , _tiPayload = pTiPayload_-    , _tiTaskList = pTiTaskList_-    , _tiPrevious = Nothing-    }----- | Parent task identifier. If the task is created at the top level, this--- parameter is omitted. Optional.-tiParent :: Lens' TasksInsert (Maybe Text)-tiParent = lens _tiParent (\ s a -> s{_tiParent = a})---- | Multipart request metadata.-tiPayload :: Lens' TasksInsert Task-tiPayload-  = lens _tiPayload (\ s a -> s{_tiPayload = a})---- | Task list identifier.-tiTaskList :: Lens' TasksInsert Text-tiTaskList-  = lens _tiTaskList (\ s a -> s{_tiTaskList = a})---- | Previous sibling task identifier. If the task is created at the first--- position among its siblings, this parameter is omitted. Optional.-tiPrevious :: Lens' TasksInsert (Maybe Text)-tiPrevious-  = lens _tiPrevious (\ s a -> s{_tiPrevious = a})--instance GoogleRequest TasksInsert where-        type Rs TasksInsert = Task-        type Scopes TasksInsert =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TasksInsert'{..}-          = go _tiTaskList _tiParent _tiPrevious (Just AltJSON)-              _tiPayload-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksInsertResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/List.hs 
@@ -1,223 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns all tasks in the specified task list.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.list@.-module Network.Google.Resource.Tasks.Tasks.List-    (-    -- * REST Resource-      TasksListResource--    -- * Creating a Request-    , tasksList-    , TasksList--    -- * Request Lenses-    , tlDueMax-    , tlShowDeleted-    , tlShowCompleted-    , tlDueMin-    , tlShowHidden-    , tlCompletedMax-    , tlUpdatedMin-    , tlTaskList-    , tlCompletedMin-    , tlPageToken-    , tlMaxResults-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.list@ method which the--- 'TasksList' request conforms to.-type TasksListResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               QueryParam "dueMax" Text :>-                 QueryParam "showDeleted" Bool :>-                   QueryParam "showCompleted" Bool :>-                     QueryParam "dueMin" Text :>-                       QueryParam "showHidden" Bool :>-                         QueryParam "completedMax" Text :>-                           QueryParam "updatedMin" Text :>-                             QueryParam "completedMin" Text :>-                               QueryParam "pageToken" Text :>-                                 QueryParam "maxResults" (Textual Int64) :>-                                   QueryParam "alt" AltJSON :> Get '[JSON] Tasks---- | Returns all tasks in the specified task list.------ /See:/ 'tasksList' smart constructor.-data TasksList =-  TasksList'-    { _tlDueMax        :: !(Maybe Text)-    , _tlShowDeleted   :: !(Maybe Bool)-    , _tlShowCompleted :: !(Maybe Bool)-    , _tlDueMin        :: !(Maybe Text)-    , _tlShowHidden    :: !(Maybe Bool)-    , _tlCompletedMax  :: !(Maybe Text)-    , _tlUpdatedMin    :: !(Maybe Text)-    , _tlTaskList      :: !Text-    , _tlCompletedMin  :: !(Maybe Text)-    , _tlPageToken     :: !(Maybe Text)-    , _tlMaxResults    :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tlDueMax'------ * 'tlShowDeleted'------ * 'tlShowCompleted'------ * 'tlDueMin'------ * 'tlShowHidden'------ * 'tlCompletedMax'------ * 'tlUpdatedMin'------ * 'tlTaskList'------ * 'tlCompletedMin'------ * 'tlPageToken'------ * 'tlMaxResults'-tasksList-    :: Text -- ^ 'tlTaskList'-    -> TasksList-tasksList pTlTaskList_ =-  TasksList'-    { _tlDueMax = Nothing-    , _tlShowDeleted = Nothing-    , _tlShowCompleted = Nothing-    , _tlDueMin = Nothing-    , _tlShowHidden = Nothing-    , _tlCompletedMax = Nothing-    , _tlUpdatedMin = Nothing-    , _tlTaskList = pTlTaskList_-    , _tlCompletedMin = Nothing-    , _tlPageToken = Nothing-    , _tlMaxResults = Nothing-    }----- | Upper bound for a task\'s due date (as a RFC 3339 timestamp) to filter--- by. Optional. The default is not to filter by due date.-tlDueMax :: Lens' TasksList (Maybe Text)-tlDueMax = lens _tlDueMax (\ s a -> s{_tlDueMax = a})---- | Flag indicating whether deleted tasks are returned in the result.--- Optional. The default is False.-tlShowDeleted :: Lens' TasksList (Maybe Bool)-tlShowDeleted-  = lens _tlShowDeleted-      (\ s a -> s{_tlShowDeleted = a})---- | Flag indicating whether completed tasks are returned in the result.--- Optional. The default is True.-tlShowCompleted :: Lens' TasksList (Maybe Bool)-tlShowCompleted-  = lens _tlShowCompleted-      (\ s a -> s{_tlShowCompleted = a})---- | Lower bound for a task\'s due date (as a RFC 3339 timestamp) to filter--- by. Optional. The default is not to filter by due date.-tlDueMin :: Lens' TasksList (Maybe Text)-tlDueMin = lens _tlDueMin (\ s a -> s{_tlDueMin = a})---- | Flag indicating whether hidden tasks are returned in the result.--- Optional. The default is False.-tlShowHidden :: Lens' TasksList (Maybe Bool)-tlShowHidden-  = lens _tlShowHidden (\ s a -> s{_tlShowHidden = a})---- | Upper bound for a task\'s completion date (as a RFC 3339 timestamp) to--- filter by. Optional. The default is not to filter by completion date.-tlCompletedMax :: Lens' TasksList (Maybe Text)-tlCompletedMax-  = lens _tlCompletedMax-      (\ s a -> s{_tlCompletedMax = a})---- | Lower bound for a task\'s last modification time (as a RFC 3339--- timestamp) to filter by. Optional. The default is not to filter by last--- modification time.-tlUpdatedMin :: Lens' TasksList (Maybe Text)-tlUpdatedMin-  = lens _tlUpdatedMin (\ s a -> s{_tlUpdatedMin = a})---- | Task list identifier.-tlTaskList :: Lens' TasksList Text-tlTaskList-  = lens _tlTaskList (\ s a -> s{_tlTaskList = a})---- | Lower bound for a task\'s completion date (as a RFC 3339 timestamp) to--- filter by. Optional. The default is not to filter by completion date.-tlCompletedMin :: Lens' TasksList (Maybe Text)-tlCompletedMin-  = lens _tlCompletedMin-      (\ s a -> s{_tlCompletedMin = a})---- | Token specifying the result page to return. Optional.-tlPageToken :: Lens' TasksList (Maybe Text)-tlPageToken-  = lens _tlPageToken (\ s a -> s{_tlPageToken = a})---- | Maximum number of task lists returned on one page. Optional. The default--- is 20 (max allowed: 100).-tlMaxResults :: Lens' TasksList (Maybe Int64)-tlMaxResults-  = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})-      . mapping _Coerce--instance GoogleRequest TasksList where-        type Rs TasksList = Tasks-        type Scopes TasksList =-             '["https://www.googleapis.com/auth/tasks",-               "https://www.googleapis.com/auth/tasks.readonly"]-        requestClient TasksList'{..}-          = go _tlTaskList _tlDueMax _tlShowDeleted-              _tlShowCompleted-              _tlDueMin-              _tlShowHidden-              _tlCompletedMax-              _tlUpdatedMin-              _tlCompletedMin-              _tlPageToken-              _tlMaxResults-              (Just AltJSON)-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksListResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Move.hs 
@@ -1,130 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Move--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Moves the specified task to another position in the task list. This can--- include putting it as a child task under a new parent and\/or move it to--- a different position among its sibling tasks.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.move@.-module Network.Google.Resource.Tasks.Tasks.Move-    (-    -- * REST Resource-      TasksMoveResource--    -- * Creating a Request-    , tasksMove-    , TasksMove--    -- * Request Lenses-    , tmParent-    , tmTaskList-    , tmTask-    , tmPrevious-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.move@ method which the--- 'TasksMove' request conforms to.-type TasksMoveResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               Capture "task" Text :>-                 "move" :>-                   QueryParam "parent" Text :>-                     QueryParam "previous" Text :>-                       QueryParam "alt" AltJSON :> Post '[JSON] Task---- | Moves the specified task to another position in the task list. This can--- include putting it as a child task under a new parent and\/or move it to--- a different position among its sibling tasks.------ /See:/ 'tasksMove' smart constructor.-data TasksMove =-  TasksMove'-    { _tmParent   :: !(Maybe Text)-    , _tmTaskList :: !Text-    , _tmTask     :: !Text-    , _tmPrevious :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksMove' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tmParent'------ * 'tmTaskList'------ * 'tmTask'------ * 'tmPrevious'-tasksMove-    :: Text -- ^ 'tmTaskList'-    -> Text -- ^ 'tmTask'-    -> TasksMove-tasksMove pTmTaskList_ pTmTask_ =-  TasksMove'-    { _tmParent = Nothing-    , _tmTaskList = pTmTaskList_-    , _tmTask = pTmTask_-    , _tmPrevious = Nothing-    }----- | New parent task identifier. If the task is moved to the top level, this--- parameter is omitted. Optional.-tmParent :: Lens' TasksMove (Maybe Text)-tmParent = lens _tmParent (\ s a -> s{_tmParent = a})---- | Task list identifier.-tmTaskList :: Lens' TasksMove Text-tmTaskList-  = lens _tmTaskList (\ s a -> s{_tmTaskList = a})---- | Task identifier.-tmTask :: Lens' TasksMove Text-tmTask = lens _tmTask (\ s a -> s{_tmTask = a})---- | New previous sibling task identifier. If the task is moved to the first--- position among its siblings, this parameter is omitted. Optional.-tmPrevious :: Lens' TasksMove (Maybe Text)-tmPrevious-  = lens _tmPrevious (\ s a -> s{_tmPrevious = a})--instance GoogleRequest TasksMove where-        type Rs TasksMove = Task-        type Scopes TasksMove =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TasksMove'{..}-          = go _tmTaskList _tmTask _tmParent _tmPrevious-              (Just AltJSON)-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksMoveResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Patch.hs 
@@ -1,110 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Patch--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the specified task. This method supports patch semantics.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.patch@.-module Network.Google.Resource.Tasks.Tasks.Patch-    (-    -- * REST Resource-      TasksPatchResource--    -- * Creating a Request-    , tasksPatch-    , TasksPatch--    -- * Request Lenses-    , tpPayload-    , tpTaskList-    , tpTask-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.patch@ method which the--- 'TasksPatch' request conforms to.-type TasksPatchResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               Capture "task" Text :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] Task :> Patch '[JSON] Task---- | Updates the specified task. This method supports patch semantics.------ /See:/ 'tasksPatch' smart constructor.-data TasksPatch =-  TasksPatch'-    { _tpPayload  :: !Task-    , _tpTaskList :: !Text-    , _tpTask     :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tpPayload'------ * 'tpTaskList'------ * 'tpTask'-tasksPatch-    :: Task -- ^ 'tpPayload'-    -> Text -- ^ 'tpTaskList'-    -> Text -- ^ 'tpTask'-    -> TasksPatch-tasksPatch pTpPayload_ pTpTaskList_ pTpTask_ =-  TasksPatch'-    {_tpPayload = pTpPayload_, _tpTaskList = pTpTaskList_, _tpTask = pTpTask_}----- | Multipart request metadata.-tpPayload :: Lens' TasksPatch Task-tpPayload-  = lens _tpPayload (\ s a -> s{_tpPayload = a})---- | Task list identifier.-tpTaskList :: Lens' TasksPatch Text-tpTaskList-  = lens _tpTaskList (\ s a -> s{_tpTaskList = a})---- | Task identifier.-tpTask :: Lens' TasksPatch Text-tpTask = lens _tpTask (\ s a -> s{_tpTask = a})--instance GoogleRequest TasksPatch where-        type Rs TasksPatch = Task-        type Scopes TasksPatch =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TasksPatch'{..}-          = go _tpTaskList _tpTask (Just AltJSON) _tpPayload-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksPatchResource)-                      mempty
− gen/Network/Google/Resource/Tasks/Tasks/Update.hs 
@@ -1,110 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Tasks.Tasks.Update--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the specified task.------ /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference> for @tasks.tasks.update@.-module Network.Google.Resource.Tasks.Tasks.Update-    (-    -- * REST Resource-      TasksUpdateResource--    -- * Creating a Request-    , tasksUpdate-    , TasksUpdate--    -- * Request Lenses-    , tuPayload-    , tuTaskList-    , tuTask-    ) where--import           Network.Google.AppsTasks.Types-import           Network.Google.Prelude---- | A resource alias for @tasks.tasks.update@ method which the--- 'TasksUpdate' request conforms to.-type TasksUpdateResource =-     "tasks" :>-       "v1" :>-         "lists" :>-           Capture "tasklist" Text :>-             "tasks" :>-               Capture "task" Text :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] Task :> Put '[JSON] Task---- | Updates the specified task.------ /See:/ 'tasksUpdate' smart constructor.-data TasksUpdate =-  TasksUpdate'-    { _tuPayload  :: !Task-    , _tuTaskList :: !Text-    , _tuTask     :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TasksUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tuPayload'------ * 'tuTaskList'------ * 'tuTask'-tasksUpdate-    :: Task -- ^ 'tuPayload'-    -> Text -- ^ 'tuTaskList'-    -> Text -- ^ 'tuTask'-    -> TasksUpdate-tasksUpdate pTuPayload_ pTuTaskList_ pTuTask_ =-  TasksUpdate'-    {_tuPayload = pTuPayload_, _tuTaskList = pTuTaskList_, _tuTask = pTuTask_}----- | Multipart request metadata.-tuPayload :: Lens' TasksUpdate Task-tuPayload-  = lens _tuPayload (\ s a -> s{_tuPayload = a})---- | Task list identifier.-tuTaskList :: Lens' TasksUpdate Text-tuTaskList-  = lens _tuTaskList (\ s a -> s{_tuTaskList = a})---- | Task identifier.-tuTask :: Lens' TasksUpdate Text-tuTask = lens _tuTask (\ s a -> s{_tuTask = a})--instance GoogleRequest TasksUpdate where-        type Rs TasksUpdate = Task-        type Scopes TasksUpdate =-             '["https://www.googleapis.com/auth/tasks"]-        requestClient TasksUpdate'{..}-          = go _tuTaskList _tuTask (Just AltJSON) _tuPayload-              appsTasksService-          where go-                  = buildClient (Proxy :: Proxy TasksUpdateResource)-                      mempty
gogol-apps-tasks.cabal view
@@ -1,59 +1,74 @@-name:                  gogol-apps-tasks-version:               0.5.0-synopsis:              Google Tasks SDK.-homepage:              https://github.com/brendanhay/gogol-bug-reports:           https://github.com/brendanhay/gogol/issues-license:               OtherLicense-license-file:          LICENSE-author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2015-2016 Brendan Hay-category:              Network, Google, Cloud-build-type:            Simple-cabal-version:         >= 1.10-extra-source-files:    README.md src/.gitkeep+cabal-version:      2.2+name:               gogol-apps-tasks+version:            1.0.0+synopsis:           Google Tasks SDK.+homepage:           https://github.com/brendanhay/gogol+bug-reports:        https://github.com/brendanhay/gogol/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+gogol@gmail.com>, Toni Cebrián <toni@tonicebrian.com> +copyright:          Copyright (c) 2015-2025 Brendan Hay+category:           Google+build-type:         Simple+extra-source-files:+  README.md+  src/.gitkeep+ description:-    Manages your tasks and task lists.-    .-    /Warning:/ This is an experimental prototype/preview release which is still-    under exploratory development and not intended for public use, caveat emptor!-    .-    This library is compatible with version @v1@-    of the API.+  The Google Tasks API lets you manage your tasks and task lists.+  .+  /Warning:/ This is an experimental prototype/preview release which is still+  under exploratory development and not intended for public use, caveat emptor!+  .+  This library is compatible with version @v1@+  of the API.  source-repository head-    type:     git-    location: git://github.com/brendanhay/gogol.git+  type:     git+  location: git://github.com/brendanhay/gogol.git+  subdir:   gogol-apps-tasks +flag field-selectors+  description:+    If record field selectors should be enabled. Disabling this requires GHC >=9.2 and the NoFieldSelectors extension.++  default:     False+  manual:      True+ library-    default-language:  Haskell2010-    hs-source-dirs:    src gen+  default-language: GHC2021+  hs-source-dirs:   src gen+  ghc-options:+    -Wall -fwarn-incomplete-uni-patterns+    -fwarn-incomplete-record-updates -funbox-strict-fields+    -fwarn-unused-packages -    ghc-options:       -Wall+  if (!flag(field-selectors) && impl(ghc >=9.2))+    default-extensions: NoFieldSelectors -    exposed-modules:-          Network.Google.AppsTasks-        , Network.Google.AppsTasks.Types-        , Network.Google.Resource.Tasks.TaskLists.Delete-        , Network.Google.Resource.Tasks.TaskLists.Get-        , Network.Google.Resource.Tasks.TaskLists.Insert-        , Network.Google.Resource.Tasks.TaskLists.List-        , Network.Google.Resource.Tasks.TaskLists.Patch-        , Network.Google.Resource.Tasks.TaskLists.Update-        , Network.Google.Resource.Tasks.Tasks.Clear-        , Network.Google.Resource.Tasks.Tasks.Delete-        , Network.Google.Resource.Tasks.Tasks.Get-        , Network.Google.Resource.Tasks.Tasks.Insert-        , Network.Google.Resource.Tasks.Tasks.List-        , Network.Google.Resource.Tasks.Tasks.Move-        , Network.Google.Resource.Tasks.Tasks.Patch-        , Network.Google.Resource.Tasks.Tasks.Update+  exposed-modules:+    Gogol.AppsTasks+    Gogol.AppsTasks.Tasks.Clear+    Gogol.AppsTasks.Tasks.Delete+    Gogol.AppsTasks.Tasks.Get+    Gogol.AppsTasks.Tasks.Insert+    Gogol.AppsTasks.Tasks.List+    Gogol.AppsTasks.Tasks.Move+    Gogol.AppsTasks.Tasks.Patch+    Gogol.AppsTasks.Tasks.Tasklists.Delete+    Gogol.AppsTasks.Tasks.Tasklists.Get+    Gogol.AppsTasks.Tasks.Tasklists.Insert+    Gogol.AppsTasks.Tasks.Tasklists.List+    Gogol.AppsTasks.Tasks.Tasklists.Patch+    Gogol.AppsTasks.Tasks.Tasklists.Update+    Gogol.AppsTasks.Tasks.Update+    Gogol.AppsTasks.Types -    other-modules:-          Network.Google.AppsTasks.Types.Product-        , Network.Google.AppsTasks.Types.Sum+  other-modules:+    Gogol.AppsTasks.Internal.Product+    Gogol.AppsTasks.Internal.Sum -    build-depends:-          gogol-core == 0.5.0.*-        , base       >= 4.7 && < 5+  build-depends:    gogol-core ^>=1.0.0