gogol-apps-tasks (empty) → 0.0.1

raw patch · 22 files changed

+2721/−0 lines, 22 filesdep +basedep +gogol-coresetup-changed

Dependencies added: base, gogol-core

Files

• LICENSE +367/−0
• README.md +28/−0
• Setup.hs +2/−0
• gen/Network/Google/AppsTasks.hs +161/−0
• gen/Network/Google/AppsTasks/Types.hs +94/−0
• gen/Network/Google/AppsTasks/Types/Product.hs +489/−0
• gen/Network/Google/AppsTasks/Types/Sum.hs +19/−0
• gen/Network/Google/Resource/Tasks/TaskLists/Delete.hs +85/−0
• gen/Network/Google/Resource/Tasks/TaskLists/Get.hs +84/−0
• gen/Network/Google/Resource/Tasks/TaskLists/Insert.hs +87/−0
• gen/Network/Google/Resource/Tasks/TaskLists/List.hs +98/−0
• gen/Network/Google/Resource/Tasks/TaskLists/Patch.hs +99/−0
• gen/Network/Google/Resource/Tasks/TaskLists/Update.hs +98/−0
• gen/Network/Google/Resource/Tasks/Tasks/Clear.hs +87/−0
• gen/Network/Google/Resource/Tasks/Tasks/Delete.hs +95/−0
• gen/Network/Google/Resource/Tasks/Tasks/Get.hs +95/−0
• gen/Network/Google/Resource/Tasks/Tasks/Insert.hs +120/−0
• gen/Network/Google/Resource/Tasks/Tasks/List.hs +216/−0
• gen/Network/Google/Resource/Tasks/Tasks/Move.hs +124/−0
• gen/Network/Google/Resource/Tasks/Tasks/Patch.hs +107/−0
• gen/Network/Google/Resource/Tasks/Tasks/Update.hs +107/−0
• gogol-apps-tasks.cabal +59/−0

@@ -0,0 +1,367 @@+Mozilla Public License Version 2.0+==================================++1. Definitions+--------------++1.1. "Contributor"+    means each individual or legal entity that creates, contributes to+    the creation of, or owns Covered Software.++1.2. "Contributor Version"+    means the combination of the Contributions of others (if any) used+    by a Contributor and that particular Contributor's Contribution.++1.3. "Contribution"+    means Covered Software of a particular Contributor.++1.4. "Covered Software"+    means Source Code Form to which the initial Contributor has attached+    the notice in Exhibit A, the Executable Form of such Source Code+    Form, and Modifications of such Source Code Form, in each case+    including portions thereof.++1.5. "Incompatible With Secondary Licenses"+    means++    (a) that the initial Contributor has attached the notice described+        in Exhibit B to the Covered Software; or++    (b) that the Covered Software was made available under the terms of+        version 1.1 or earlier of the License, but not also under the+        terms of a Secondary License.++1.6. "Executable Form"+    means any form of the work other than Source Code Form.++1.7. "Larger Work"+    means a work that combines Covered Software with other material, in+    a separate file or files, that is not Covered Software.++1.8. "License"+    means this document.++1.9. "Licensable"+    means having the right to grant, to the maximum extent possible,+    whether at the time of the initial grant or subsequently, any and+    all of the rights conveyed by this License.++1.10. "Modifications"+    means any of the following:++    (a) any file in Source Code Form that results from an addition to,+        deletion from, or modification of the contents of Covered+        Software; or++    (b) any new file in Source Code Form that contains any Covered+        Software.++1.11. "Patent Claims" of a Contributor+    means any patent claim(s), including without limitation, method,+    process, and apparatus claims, in any patent Licensable by such+    Contributor that would be infringed, but for the grant of the+    License, by the making, using, selling, offering for sale, having+    made, import, or transfer of either its Contributions or its+    Contributor Version.++1.12. "Secondary License"+    means either the GNU General Public License, Version 2.0, the GNU+    Lesser General Public License, Version 2.1, the GNU Affero General+    Public License, Version 3.0, or any later versions of those+    licenses.++1.13. "Source Code Form"+    means the form of the work preferred for making modifications.++1.14. "You" (or "Your")+    means an individual or a legal entity exercising rights under this+    License. For legal entities, "You" includes any entity that+    controls, is controlled by, or is under common control with You. For+    purposes of this definition, "control" means (a) the power, direct+    or indirect, to cause the direction or management of such entity,+    whether by contract or otherwise, or (b) ownership of more than+    fifty percent (50%) of the outstanding shares or beneficial+    ownership of such entity.++2. License Grants and Conditions+--------------------------------++2.1. Grants++Each Contributor hereby grants You a world-wide, royalty-free,+non-exclusive license:++(a) under intellectual property rights (other than patent or trademark)+    Licensable by such Contributor to use, reproduce, make available,+    modify, display, perform, distribute, and otherwise exploit its+    Contributions, either on an unmodified basis, with Modifications, or+    as part of a Larger Work; and++(b) under Patent Claims of such Contributor to make, use, sell, offer+    for sale, have made, import, and otherwise transfer either its+    Contributions or its Contributor Version.++2.2. Effective Date++The licenses granted in Section 2.1 with respect to any Contribution+become effective for each Contribution on the date the Contributor first+distributes such Contribution.++2.3. Limitations on Grant Scope++The licenses granted in this Section 2 are the only rights granted under+this License. No additional rights or licenses will be implied from the+distribution or licensing of Covered Software under this License.+Notwithstanding Section 2.1(b) above, no patent license is granted by a+Contributor:++(a) for any code that a Contributor has removed from Covered Software;+    or++(b) for infringements caused by: (i) Your and any other third party's+    modifications of Covered Software, or (ii) the combination of its+    Contributions with other software (except as part of its Contributor+    Version); or++(c) under Patent Claims infringed by Covered Software in the absence of+    its Contributions.++This License does not grant any rights in the trademarks, service marks,+or logos of any Contributor (except as may be necessary to comply with+the notice requirements in Section 3.4).++2.4. Subsequent Licenses++No Contributor makes additional grants as a result of Your choice to+distribute the Covered Software under a subsequent version of this+License (see Section 10.2) or under the terms of a Secondary License (if+permitted under the terms of Section 3.3).++2.5. Representation++Each Contributor represents that the Contributor believes its+Contributions are its original creation(s) or it has sufficient rights+to grant the rights to its Contributions conveyed by this License.++2.6. Fair Use++This License is not intended to limit any rights You have under+applicable copyright doctrines of fair use, fair dealing, or other+equivalents.++2.7. Conditions++Sections 3.1, 3.2, 3.3, and 3.4 are conditions of the licenses granted+in Section 2.1.++3. Responsibilities+-------------------++3.1. Distribution of Source Form++All distribution of Covered Software in Source Code Form, including any+Modifications that You create or to which You contribute, must be under+the terms of this License. You must inform recipients that the Source+Code Form of the Covered Software is governed by the terms of this+License, and how they can obtain a copy of this License. You may not+attempt to alter or restrict the recipients' rights in the Source Code+Form.++3.2. Distribution of Executable Form++If You distribute Covered Software in Executable Form then:++(a) such Covered Software must also be made available in Source Code+    Form, as described in Section 3.1, and You must inform recipients of+    the Executable Form how they can obtain a copy of such Source Code+    Form by reasonable means in a timely manner, at a charge no more+    than the cost of distribution to the recipient; and++(b) You may distribute such Executable Form under the terms of this+    License, or sublicense it under different terms, provided that the+    license for the Executable Form does not attempt to limit or alter+    the recipients' rights in the Source Code Form under this License.++3.3. Distribution of a Larger Work++You may create and distribute a Larger Work under terms of Your choice,+provided that You also comply with the requirements of this License for+the Covered Software. If the Larger Work is a combination of Covered+Software with a work governed by one or more Secondary Licenses, and the+Covered Software is not Incompatible With Secondary Licenses, this+License permits You to additionally distribute such Covered Software+under the terms of such Secondary License(s), so that the recipient of+the Larger Work may, at their option, further distribute the Covered+Software under the terms of either this License or such Secondary+License(s).++3.4. Notices++You may not remove or alter the substance of any license notices+(including copyright notices, patent notices, disclaimers of warranty,+or limitations of liability) contained within the Source Code Form of+the Covered Software, except that You may alter any license notices to+the extent required to remedy known factual inaccuracies.++3.5. Application of Additional Terms++You may choose to offer, and to charge a fee for, warranty, support,+indemnity or liability obligations to one or more recipients of Covered+Software. However, You may do so only on Your own behalf, and not on+behalf of any Contributor. You must make it absolutely clear that any+such warranty, support, indemnity, or liability obligation is offered by+You alone, and You hereby agree to indemnify every Contributor for any+liability incurred by such Contributor as a result of warranty, support,+indemnity or liability terms You offer. You may include additional+disclaimers of warranty and limitations of liability specific to any+jurisdiction.++4. Inability to Comply Due to Statute or Regulation+---------------------------------------------------++If it is impossible for You to comply with any of the terms of this+License with respect to some or all of the Covered Software due to+statute, judicial order, or regulation then You must: (a) comply with+the terms of this License to the maximum extent possible; and (b)+describe the limitations and the code they affect. Such description must+be placed in a text file included with all distributions of the Covered+Software under this License. Except to the extent prohibited by statute+or regulation, such description must be sufficiently detailed for a+recipient of ordinary skill to be able to understand it.++5. Termination+--------------++5.1. The rights granted under this License will terminate automatically+if You fail to comply with any of its terms. However, if You become+compliant, then the rights granted under this License from a particular+Contributor are reinstated (a) provisionally, unless and until such+Contributor explicitly and finally terminates Your grants, and (b) on an+ongoing basis, if such Contributor fails to notify You of the+non-compliance by some reasonable means prior to 60 days after You have+come back into compliance. Moreover, Your grants from a particular+Contributor are reinstated on an ongoing basis if such Contributor+notifies You of the non-compliance by some reasonable means, this is the+first time You have received notice of non-compliance with this License+from such Contributor, and You become compliant prior to 30 days after+Your receipt of the notice.++5.2. If You initiate litigation against any entity by asserting a patent+infringement claim (excluding declaratory judgment actions,+counter-claims, and cross-claims) alleging that a Contributor Version+directly or indirectly infringes any patent, then the rights granted to+You by any and all Contributors for the Covered Software under Section+2.1 of this License shall terminate.++5.3. In the event of termination under Sections 5.1 or 5.2 above, all+end user license agreements (excluding distributors and resellers) which+have been validly granted by You or Your distributors under this License+prior to termination shall survive termination.++************************************************************************+*                                                                      *+*  6. Disclaimer of Warranty                                           *+*  -------------------------                                           *+*                                                                      *+*  Covered Software is provided under this License on an "as is"       *+*  basis, without warranty of any kind, either expressed, implied, or  *+*  statutory, including, without limitation, warranties that the       *+*  Covered Software is free of defects, merchantable, fit for a        *+*  particular purpose or non-infringing. The entire risk as to the     *+*  quality and performance of the Covered Software is with You.        *+*  Should any Covered Software prove defective in any respect, You     *+*  (not any Contributor) assume the cost of any necessary servicing,   *+*  repair, or correction. This disclaimer of warranty constitutes an   *+*  essential part of this License. No use of any Covered Software is   *+*  authorized under this License except under this disclaimer.         *+*                                                                      *+************************************************************************++************************************************************************+*                                                                      *+*  7. Limitation of Liability                                          *+*  --------------------------                                          *+*                                                                      *+*  Under no circumstances and under no legal theory, whether tort      *+*  (including negligence), contract, or otherwise, shall any           *+*  Contributor, or anyone who distributes Covered Software as          *+*  permitted above, be liable to You for any direct, indirect,         *+*  special, incidental, or consequential damages of any character      *+*  including, without limitation, damages for lost profits, loss of    *+*  goodwill, work stoppage, computer failure or malfunction, or any    *+*  and all other commercial damages or losses, even if such party      *+*  shall have been informed of the possibility of such damages. This   *+*  limitation of liability shall not apply to liability for death or   *+*  personal injury resulting from such party's negligence to the       *+*  extent applicable law prohibits such limitation. Some               *+*  jurisdictions do not allow the exclusion or limitation of           *+*  incidental or consequential damages, so this exclusion and          *+*  limitation may not apply to You.                                    *+*                                                                      *+************************************************************************++8. Litigation+-------------++Any litigation relating to this License may be brought only in the+courts of a jurisdiction where the defendant maintains its principal+place of business and such litigation shall be governed by laws of that+jurisdiction, without reference to its conflict-of-law provisions.+Nothing in this Section shall prevent a party's ability to bring+cross-claims or counter-claims.++9. Miscellaneous+----------------++This License represents the complete agreement concerning the subject+matter hereof. If any provision of this License is held to be+unenforceable, such provision shall be reformed only to the extent+necessary to make it enforceable. Any law or regulation which provides+that the language of a contract shall be construed against the drafter+shall not be used to construe this License against a Contributor.++10. Versions of the License+---------------------------++10.1. New Versions++Mozilla Foundation is the license steward. Except as provided in Section+10.3, no one other than the license steward has the right to modify or+publish new versions of this License. Each version will be given a+distinguishing version number.++10.2. Effect of New Versions++You may distribute the Covered Software under the terms of the version+of the License under which You originally received the Covered Software,+or under the terms of any subsequent version published by the license+steward.++10.3. Modified Versions++If you create software not governed by this License, and you want to+create a new license for such software, you may create and use a+modified version of this License if you rename the license and remove+any references to the name of the license steward (except to note that+such modified license differs from this License).++10.4. Distributing Source Code Form that is Incompatible With Secondary+Licenses++If You choose to distribute Source Code Form that is Incompatible With+Secondary Licenses under the terms of this version of the License, the+notice described in Exhibit B of this License must be attached.++Exhibit A - Source Code Form License Notice+-------------------------------------------++  This Source Code Form is subject to the terms of the Mozilla Public+  License, v. 2.0. If a copy of the MPL was not distributed with this+  file, You can obtain one at http://mozilla.org/MPL/2.0/.++If it is not possible or desirable to put the notice in a particular+file, then You may include the notice in a location (such as a LICENSE+file in a relevant directory) where a recipient would be likely to look+for such a notice.++You may add additional accurate notices of copyright ownership.

@@ -0,0 +1,28 @@+# gogol-apps-tasks++* [Version](#version)+* [Description](#description)+* [Contribute](#contribute)+* [Licence](#licence)+++## Version++`0.0.1`+++## Description++A client library for the Google Tasks.+++## Contribute++For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/amazonka/issues).++> _Note:_ this library is an auto-generated Haskell package. Please see `amazonka-gen` for more information.+++## Licence++`gogol-apps-tasks` is released under the [Mozilla Public License Version 2.0](http://www.mozilla.org/MPL/).

@@ -0,0 +1,2 @@+import           Distribution.Simple+main = defaultMain

@@ -0,0 +1,161 @@+{-# 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 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)+--+-- Lets you manage your tasks and task lists.+--+-- /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference>+module Network.Google.AppsTasks+    (+    -- * Service Configuration+      appsTasksService++    -- * 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

@@ -0,0 +1,94 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE NoImplicitPrelude  #-}+{-# LANGUAGE OverloadedStrings  #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module      : Network.Google.AppsTasks.Types+-- Copyright   : (c) 2015 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 :: Service+appsTasksService+  = defaultService (ServiceId "tasks:v1")+      "www.googleapis.com"++-- | View your tasks+tasksReadonlyScope :: OAuthScope+tasksReadonlyScope = "https://www.googleapis.com/auth/tasks.readonly";++-- | Manage your tasks+tasksScope :: OAuthScope+tasksScope = "https://www.googleapis.com/auth/tasks";

@@ -0,0 +1,489 @@+{-# 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 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])

@@ -0,0 +1,19 @@+{-# 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 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

@@ -0,0 +1,85 @@+{-# 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 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 = ()+        requestClient TaskListsDelete{..}+          = go _tldTaskList (Just AltJSON) appsTasksService+          where go+                  = buildClient+                      (Proxy :: Proxy TaskListsDeleteResource)+                      mempty

@@ -0,0 +1,84 @@+{-# 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 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+        requestClient TaskListsGet{..}+          = go _tlgTaskList (Just AltJSON) appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TaskListsGetResource)+                      mempty

@@ -0,0 +1,87 @@+{-# 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 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+        requestClient TaskListsInsert{..}+          = go (Just AltJSON) _tliPayload appsTasksService+          where go+                  = buildClient+                      (Proxy :: Proxy TaskListsInsertResource)+                      mempty

@@ -0,0 +1,98 @@+{-# 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 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 100.+tllMaxResults :: Lens' TaskListsList (Maybe Int64)+tllMaxResults+  = lens _tllMaxResults+      (\ s a -> s{_tllMaxResults = a})+      . mapping _Coerce++instance GoogleRequest TaskListsList where+        type Rs TaskListsList = TaskLists+        requestClient TaskListsList{..}+          = go _tllPageToken _tllMaxResults (Just AltJSON)+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TaskListsListResource)+                      mempty

@@ -0,0 +1,99 @@+{-# 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 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+        requestClient TaskListsPatch{..}+          = go _tlpTaskList (Just AltJSON) _tlpPayload+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TaskListsPatchResource)+                      mempty

@@ -0,0 +1,98 @@+{-# 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 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+        requestClient TaskListsUpdate{..}+          = go _tluTaskList (Just AltJSON) _tluPayload+              appsTasksService+          where go+                  = buildClient+                      (Proxy :: Proxy TaskListsUpdateResource)+                      mempty

@@ -0,0 +1,87 @@+{-# 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 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 = ()+        requestClient TasksClear{..}+          = go _tcTaskList (Just AltJSON) appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksClearResource)+                      mempty

@@ -0,0 +1,95 @@+{-# 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 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 = ()+        requestClient TasksDelete{..}+          = go _tdTaskList _tdTask (Just AltJSON)+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksDeleteResource)+                      mempty

@@ -0,0 +1,95 @@+{-# 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 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+        requestClient TasksGet{..}+          = go _tgTaskList _tgTask (Just AltJSON)+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksGetResource)+                      mempty

@@ -0,0 +1,120 @@+{-# 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 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+        requestClient TasksInsert{..}+          = go _tiTaskList _tiParent _tiPrevious (Just AltJSON)+              _tiPayload+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksInsertResource)+                      mempty

@@ -0,0 +1,216 @@+{-# 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 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 100.+tlMaxResults :: Lens' TasksList (Maybe Int64)+tlMaxResults+  = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})+      . mapping _Coerce++instance GoogleRequest TasksList where+        type Rs TasksList = Tasks+        requestClient TasksList{..}+          = go _tlTaskList _tlDueMax _tlShowDeleted+              _tlShowCompleted+              _tlDueMin+              _tlShowHidden+              _tlCompletedMax+              _tlUpdatedMin+              _tlCompletedMin+              _tlPageToken+              _tlMaxResults+              (Just AltJSON)+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksListResource)+                      mempty

@@ -0,0 +1,124 @@+{-# 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 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+        requestClient TasksMove{..}+          = go _tmTaskList _tmTask _tmParent _tmPrevious+              (Just AltJSON)+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksMoveResource)+                      mempty

@@ -0,0 +1,107 @@+{-# 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 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+        requestClient TasksPatch{..}+          = go _tpTaskList _tpTask (Just AltJSON) _tpPayload+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksPatchResource)+                      mempty

@@ -0,0 +1,107 @@+{-# 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 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+        requestClient TasksUpdate{..}+          = go _tuTaskList _tuTask (Just AltJSON) _tuPayload+              appsTasksService+          where go+                  = buildClient (Proxy :: Proxy TasksUpdateResource)+                      mempty

@@ -0,0 +1,59 @@+name:                  gogol-apps-tasks+version:               0.0.1+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 Brendan Hay+category:              Network, Google, Cloud+build-type:            Simple+cabal-version:         >= 1.10+extra-source-files:    README.md++description:+    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++library+    default-language:  Haskell2010+    hs-source-dirs:    src gen++    ghc-options:       -Wall++    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++    other-modules:+          Network.Google.AppsTasks.Types.Product+        , Network.Google.AppsTasks.Types.Sum++    build-depends:+          gogol-core == 0.0.1.*+        , base       >= 4.7 && < 5