gogol-admin-directory 0.1.0 → 0.1.1

raw patch · 9 files changed

+338/−17 lines, 9 filesdep ~gogol-corePVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

• README.md +1/−1
• gen/Network/Google/Directory.hs +21/−0
• gen/Network/Google/Directory/Types.hs +16/−0
• gen/Network/Google/Directory/Types/Product.hs +174/−9
• gen/Network/Google/Resource/Directory/ChromeosDevices/Action.hs +118/−0
• gen/Network/Google/Resource/Directory/Customers/Get.hs +2/−2
• gen/Network/Google/Resource/Directory/Domains/Get.hs +2/−2
• gogol-admin-directory.cabal +4/−3
• src/.gitkeep +0/−0

@@ -8,7 +8,7 @@  ## Version -`0.1.0`+`0.1.1`   ## Description

@@ -69,6 +69,9 @@     -- ** directory.asps.list     , module Network.Google.Resource.Directory.Asps.List +    -- ** directory.chromeosdevices.action+    , module Network.Google.Resource.Directory.ChromeosDevices.Action+     -- ** directory.chromeosdevices.get     , module Network.Google.Resource.Directory.ChromeosDevices.Get @@ -754,6 +757,12 @@     -- ** MobileDevicesListProjection     , MobileDevicesListProjection (..) +    -- ** ChromeOSDeviceAction+    , ChromeOSDeviceAction+    , chromeOSDeviceAction+    , codaAction+    , codaDeprovisionReason+     -- ** Role     , Role     , role'@@ -897,14 +906,19 @@     , mobileDevice     , mobEmail     , mobStatus+    , mobPrivilege     , mobEtag     , mobResourceId+    , mobManufacturer     , mobBuildNumber     , mobManagedAccountIsOnOwnerProFile     , mobLastSync     , mobOtherAccountsInfo     , mobKind     , mobAdbStatus+    , mobReleaseVersion+    , mobBrand+    , mobSecurityPatchLevel     , mobNetworkOperator     , mobKernelVersion     , mobOS@@ -913,16 +927,20 @@     , mobDeveloperOptionsStatus     , mobUnknownSourcesStatus     , mobMeid+    , mobBootLoaderVersion     , mobDeviceId     , mobFirstSync     , mobUserAgent     , mobImei     , mobType     , mobWifiMACAddress+    , mobEncryptionStatus     , mobSerialNumber+    , mobDevicePasswordStatus     , mobHardwareId     , mobBasebandVersion     , mobSupportsWorkProFile+    , mobHardware     , mobDeviceCompromisedStatus     , mobApplications     , mobDefaultLanguage@@ -931,6 +949,7 @@     , Member     , member     , memEmail+    , memStatus     , memEtag     , memKind     , memRole@@ -1051,6 +1070,7 @@ import           Network.Google.Resource.Directory.Asps.Delete import           Network.Google.Resource.Directory.Asps.Get import           Network.Google.Resource.Directory.Asps.List+import           Network.Google.Resource.Directory.ChromeosDevices.Action import           Network.Google.Resource.Directory.ChromeosDevices.Get import           Network.Google.Resource.Directory.ChromeosDevices.List import           Network.Google.Resource.Directory.ChromeosDevices.Patch@@ -1240,6 +1260,7 @@        :<|> ChromeosDevicesListResource        :<|> ChromeosDevicesPatchResource        :<|> ChromeosDevicesGetResource+       :<|> ChromeosDevicesActionResource        :<|> ChromeosDevicesUpdateResource        :<|> AspsListResource        :<|> AspsGetResource

@@ -458,6 +458,12 @@     -- * MobileDevicesListProjection     , MobileDevicesListProjection (..) +    -- * ChromeOSDeviceAction+    , ChromeOSDeviceAction+    , chromeOSDeviceAction+    , codaAction+    , codaDeprovisionReason+     -- * Role     , Role     , role'@@ -601,14 +607,19 @@     , mobileDevice     , mobEmail     , mobStatus+    , mobPrivilege     , mobEtag     , mobResourceId+    , mobManufacturer     , mobBuildNumber     , mobManagedAccountIsOnOwnerProFile     , mobLastSync     , mobOtherAccountsInfo     , mobKind     , mobAdbStatus+    , mobReleaseVersion+    , mobBrand+    , mobSecurityPatchLevel     , mobNetworkOperator     , mobKernelVersion     , mobOS@@ -617,16 +628,20 @@     , mobDeveloperOptionsStatus     , mobUnknownSourcesStatus     , mobMeid+    , mobBootLoaderVersion     , mobDeviceId     , mobFirstSync     , mobUserAgent     , mobImei     , mobType     , mobWifiMACAddress+    , mobEncryptionStatus     , mobSerialNumber+    , mobDevicePasswordStatus     , mobHardwareId     , mobBasebandVersion     , mobSupportsWorkProFile+    , mobHardware     , mobDeviceCompromisedStatus     , mobApplications     , mobDefaultLanguage@@ -635,6 +650,7 @@     , Member     , member     , memEmail+    , memStatus     , memEtag     , memKind     , memRole

@@ -3508,6 +3508,54 @@                   ("customSchemas" .=) <$> _useCustomSchemas,                   ("suspensionReason" .=) <$> _useSuspensionReason]) +-- | JSON request template for firing actions on ChromeOs Device in Directory+-- Devices API.+--+-- /See:/ 'chromeOSDeviceAction' smart constructor.+data ChromeOSDeviceAction = ChromeOSDeviceAction'+    { _codaAction            :: !(Maybe Text)+    , _codaDeprovisionReason :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ChromeOSDeviceAction' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'codaAction'+--+-- * 'codaDeprovisionReason'+chromeOSDeviceAction+    :: ChromeOSDeviceAction+chromeOSDeviceAction =+    ChromeOSDeviceAction'+    { _codaAction = Nothing+    , _codaDeprovisionReason = Nothing+    }++-- | Action to be taken on the ChromeOs Device+codaAction :: Lens' ChromeOSDeviceAction (Maybe Text)+codaAction+  = lens _codaAction (\ s a -> s{_codaAction = a})++codaDeprovisionReason :: Lens' ChromeOSDeviceAction (Maybe Text)+codaDeprovisionReason+  = lens _codaDeprovisionReason+      (\ s a -> s{_codaDeprovisionReason = a})++instance FromJSON ChromeOSDeviceAction where+        parseJSON+          = withObject "ChromeOSDeviceAction"+              (\ o ->+                 ChromeOSDeviceAction' <$>+                   (o .:? "action") <*> (o .:? "deprovisionReason"))++instance ToJSON ChromeOSDeviceAction where+        toJSON ChromeOSDeviceAction'{..}+          = object+              (catMaybes+                 [("action" .=) <$> _codaAction,+                  ("deprovisionReason" .=) <$> _codaDeprovisionReason])+ -- | JSON template for role resource in Directory API. -- -- /See:/ 'role'' smart constructor.@@ -4581,14 +4629,19 @@ data MobileDevice = MobileDevice'     { _mobEmail                          :: !(Maybe [Text])     , _mobStatus                         :: !(Maybe Text)+    , _mobPrivilege                      :: !(Maybe Text)     , _mobEtag                           :: !(Maybe Text)     , _mobResourceId                     :: !(Maybe Text)+    , _mobManufacturer                   :: !(Maybe Text)     , _mobBuildNumber                    :: !(Maybe Text)     , _mobManagedAccountIsOnOwnerProFile :: !(Maybe Bool)     , _mobLastSync                       :: !(Maybe DateTime')     , _mobOtherAccountsInfo              :: !(Maybe [Text])     , _mobKind                           :: !Text     , _mobAdbStatus                      :: !(Maybe Bool)+    , _mobReleaseVersion                 :: !(Maybe Text)+    , _mobBrand                          :: !(Maybe Text)+    , _mobSecurityPatchLevel             :: !(Maybe (Textual Int64))     , _mobNetworkOperator                :: !(Maybe Text)     , _mobKernelVersion                  :: !(Maybe Text)     , _mobOS                             :: !(Maybe Text)@@ -4597,16 +4650,20 @@     , _mobDeveloperOptionsStatus         :: !(Maybe Bool)     , _mobUnknownSourcesStatus           :: !(Maybe Bool)     , _mobMeid                           :: !(Maybe Text)+    , _mobBootLoaderVersion              :: !(Maybe Text)     , _mobDeviceId                       :: !(Maybe Text)     , _mobFirstSync                      :: !(Maybe DateTime')     , _mobUserAgent                      :: !(Maybe Text)     , _mobImei                           :: !(Maybe Text)     , _mobType                           :: !(Maybe Text)     , _mobWifiMACAddress                 :: !(Maybe Text)+    , _mobEncryptionStatus               :: !(Maybe Text)     , _mobSerialNumber                   :: !(Maybe Text)+    , _mobDevicePasswordStatus           :: !(Maybe Text)     , _mobHardwareId                     :: !(Maybe Text)     , _mobBasebandVersion                :: !(Maybe Text)     , _mobSupportsWorkProFile            :: !(Maybe Bool)+    , _mobHardware                       :: !(Maybe Text)     , _mobDeviceCompromisedStatus        :: !(Maybe Text)     , _mobApplications                   :: !(Maybe [MobileDeviceApplicationsItem])     , _mobDefaultLanguage                :: !(Maybe Text)@@ -4620,10 +4677,14 @@ -- -- * 'mobStatus' --+-- * 'mobPrivilege'+-- -- * 'mobEtag' -- -- * 'mobResourceId' --+-- * 'mobManufacturer'+-- -- * 'mobBuildNumber' -- -- * 'mobManagedAccountIsOnOwnerProFile'@@ -4636,6 +4697,12 @@ -- -- * 'mobAdbStatus' --+-- * 'mobReleaseVersion'+--+-- * 'mobBrand'+--+-- * 'mobSecurityPatchLevel'+-- -- * 'mobNetworkOperator' -- -- * 'mobKernelVersion'@@ -4652,6 +4719,8 @@ -- -- * 'mobMeid' --+-- * 'mobBootLoaderVersion'+-- -- * 'mobDeviceId' -- -- * 'mobFirstSync'@@ -4664,14 +4733,20 @@ -- -- * 'mobWifiMACAddress' --+-- * 'mobEncryptionStatus'+-- -- * 'mobSerialNumber' --+-- * 'mobDevicePasswordStatus'+-- -- * 'mobHardwareId' -- -- * 'mobBasebandVersion' -- -- * 'mobSupportsWorkProFile' --+-- * 'mobHardware'+-- -- * 'mobDeviceCompromisedStatus' -- -- * 'mobApplications'@@ -4683,14 +4758,19 @@     MobileDevice'     { _mobEmail = Nothing     , _mobStatus = Nothing+    , _mobPrivilege = Nothing     , _mobEtag = Nothing     , _mobResourceId = Nothing+    , _mobManufacturer = Nothing     , _mobBuildNumber = Nothing     , _mobManagedAccountIsOnOwnerProFile = Nothing     , _mobLastSync = Nothing     , _mobOtherAccountsInfo = Nothing     , _mobKind = "admin#directory#mobiledevice"     , _mobAdbStatus = Nothing+    , _mobReleaseVersion = Nothing+    , _mobBrand = Nothing+    , _mobSecurityPatchLevel = Nothing     , _mobNetworkOperator = Nothing     , _mobKernelVersion = Nothing     , _mobOS = Nothing@@ -4699,16 +4779,20 @@     , _mobDeveloperOptionsStatus = Nothing     , _mobUnknownSourcesStatus = Nothing     , _mobMeid = Nothing+    , _mobBootLoaderVersion = Nothing     , _mobDeviceId = Nothing     , _mobFirstSync = Nothing     , _mobUserAgent = Nothing     , _mobImei = Nothing     , _mobType = Nothing     , _mobWifiMACAddress = Nothing+    , _mobEncryptionStatus = Nothing     , _mobSerialNumber = Nothing+    , _mobDevicePasswordStatus = Nothing     , _mobHardwareId = Nothing     , _mobBasebandVersion = Nothing     , _mobSupportsWorkProFile = Nothing+    , _mobHardware = Nothing     , _mobDeviceCompromisedStatus = Nothing     , _mobApplications = Nothing     , _mobDefaultLanguage = Nothing@@ -4726,6 +4810,11 @@ mobStatus   = lens _mobStatus (\ s a -> s{_mobStatus = a}) +-- | DMAgentPermission (Read-only)+mobPrivilege :: Lens' MobileDevice (Maybe Text)+mobPrivilege+  = lens _mobPrivilege (\ s a -> s{_mobPrivilege = a})+ -- | ETag of the resource. mobEtag :: Lens' MobileDevice (Maybe Text) mobEtag = lens _mobEtag (\ s a -> s{_mobEtag = a})@@ -4736,6 +4825,12 @@   = lens _mobResourceId       (\ s a -> s{_mobResourceId = a}) +-- | Mobile Device manufacturer (Read-only)+mobManufacturer :: Lens' MobileDevice (Maybe Text)+mobManufacturer+  = lens _mobManufacturer+      (\ s a -> s{_mobManufacturer = a})+ -- | Mobile Device Build number (Read-only) mobBuildNumber :: Lens' MobileDevice (Maybe Text) mobBuildNumber@@ -4773,6 +4868,23 @@ mobAdbStatus   = lens _mobAdbStatus (\ s a -> s{_mobAdbStatus = a}) +-- | Mobile Device release version version (Read-only)+mobReleaseVersion :: Lens' MobileDevice (Maybe Text)+mobReleaseVersion+  = lens _mobReleaseVersion+      (\ s a -> s{_mobReleaseVersion = a})++-- | Mobile Device Brand (Read-only)+mobBrand :: Lens' MobileDevice (Maybe Text)+mobBrand = lens _mobBrand (\ s a -> s{_mobBrand = a})++-- | Mobile Device Security patch level (Read-only)+mobSecurityPatchLevel :: Lens' MobileDevice (Maybe Int64)+mobSecurityPatchLevel+  = lens _mobSecurityPatchLevel+      (\ s a -> s{_mobSecurityPatchLevel = a})+      . mapping _Coerce+ -- | Mobile Device mobile or network operator (if available) (Read-only) mobNetworkOperator :: Lens' MobileDevice (Maybe Text) mobNetworkOperator@@ -4815,6 +4927,12 @@ mobMeid :: Lens' MobileDevice (Maybe Text) mobMeid = lens _mobMeid (\ s a -> s{_mobMeid = a}) +-- | Mobile Device Bootloader version (Read-only)+mobBootLoaderVersion :: Lens' MobileDevice (Maybe Text)+mobBootLoaderVersion+  = lens _mobBootLoaderVersion+      (\ s a -> s{_mobBootLoaderVersion = a})+ -- | Mobile Device serial number (Read-only) mobDeviceId :: Lens' MobileDevice (Maybe Text) mobDeviceId@@ -4846,12 +4964,24 @@   = lens _mobWifiMACAddress       (\ s a -> s{_mobWifiMACAddress = a}) +-- | Mobile Device Encryption Status (Read-only)+mobEncryptionStatus :: Lens' MobileDevice (Maybe Text)+mobEncryptionStatus+  = lens _mobEncryptionStatus+      (\ s a -> s{_mobEncryptionStatus = a})+ -- | Mobile Device SSN or Serial Number (Read-only) mobSerialNumber :: Lens' MobileDevice (Maybe Text) mobSerialNumber   = lens _mobSerialNumber       (\ s a -> s{_mobSerialNumber = a}) +-- | DevicePasswordStatus (Read-only)+mobDevicePasswordStatus :: Lens' MobileDevice (Maybe Text)+mobDevicePasswordStatus+  = lens _mobDevicePasswordStatus+      (\ s a -> s{_mobDevicePasswordStatus = a})+ -- | Mobile Device Hardware Id (Read-only) mobHardwareId :: Lens' MobileDevice (Maybe Text) mobHardwareId@@ -4870,6 +5000,11 @@   = lens _mobSupportsWorkProFile       (\ s a -> s{_mobSupportsWorkProFile = a}) +-- | Mobile Device Hardware (Read-only)+mobHardware :: Lens' MobileDevice (Maybe Text)+mobHardware+  = lens _mobHardware (\ s a -> s{_mobHardware = a})+ -- | Mobile Device compromised status (Read-only) mobDeviceCompromisedStatus :: Lens' MobileDevice (Maybe Text) mobDeviceCompromisedStatus@@ -4896,14 +5031,19 @@               (\ o ->                  MobileDevice' <$>                    (o .:? "email" .!= mempty) <*> (o .:? "status") <*>-                     (o .:? "etag")+                     (o .:? "privilege")+                     <*> (o .:? "etag")                      <*> (o .:? "resourceId")+                     <*> (o .:? "manufacturer")                      <*> (o .:? "buildNumber")                      <*> (o .:? "managedAccountIsOnOwnerProfile")                      <*> (o .:? "lastSync")                      <*> (o .:? "otherAccountsInfo" .!= mempty)                      <*> (o .:? "kind" .!= "admin#directory#mobiledevice")                      <*> (o .:? "adbStatus")+                     <*> (o .:? "releaseVersion")+                     <*> (o .:? "brand")+                     <*> (o .:? "securityPatchLevel")                      <*> (o .:? "networkOperator")                      <*> (o .:? "kernelVersion")                      <*> (o .:? "os")@@ -4912,16 +5052,20 @@                      <*> (o .:? "developerOptionsStatus")                      <*> (o .:? "unknownSourcesStatus")                      <*> (o .:? "meid")+                     <*> (o .:? "bootloaderVersion")                      <*> (o .:? "deviceId")                      <*> (o .:? "firstSync")                      <*> (o .:? "userAgent")                      <*> (o .:? "imei")                      <*> (o .:? "type")                      <*> (o .:? "wifiMacAddress")+                     <*> (o .:? "encryptionStatus")                      <*> (o .:? "serialNumber")+                     <*> (o .:? "devicePasswordStatus")                      <*> (o .:? "hardwareId")                      <*> (o .:? "basebandVersion")                      <*> (o .:? "supportsWorkProfile")+                     <*> (o .:? "hardware")                      <*> (o .:? "deviceCompromisedStatus")                      <*> (o .:? "applications" .!= mempty)                      <*> (o .:? "defaultLanguage"))@@ -4932,8 +5076,10 @@               (catMaybes                  [("email" .=) <$> _mobEmail,                   ("status" .=) <$> _mobStatus,+                  ("privilege" .=) <$> _mobPrivilege,                   ("etag" .=) <$> _mobEtag,                   ("resourceId" .=) <$> _mobResourceId,+                  ("manufacturer" .=) <$> _mobManufacturer,                   ("buildNumber" .=) <$> _mobBuildNumber,                   ("managedAccountIsOnOwnerProfile" .=) <$>                     _mobManagedAccountIsOnOwnerProFile,@@ -4941,6 +5087,9 @@                   ("otherAccountsInfo" .=) <$> _mobOtherAccountsInfo,                   Just ("kind" .= _mobKind),                   ("adbStatus" .=) <$> _mobAdbStatus,+                  ("releaseVersion" .=) <$> _mobReleaseVersion,+                  ("brand" .=) <$> _mobBrand,+                  ("securityPatchLevel" .=) <$> _mobSecurityPatchLevel,                   ("networkOperator" .=) <$> _mobNetworkOperator,                   ("kernelVersion" .=) <$> _mobKernelVersion,                   ("os" .=) <$> _mobOS, ("name" .=) <$> _mobName,@@ -4950,16 +5099,21 @@                   ("unknownSourcesStatus" .=) <$>                     _mobUnknownSourcesStatus,                   ("meid" .=) <$> _mobMeid,+                  ("bootloaderVersion" .=) <$> _mobBootLoaderVersion,                   ("deviceId" .=) <$> _mobDeviceId,                   ("firstSync" .=) <$> _mobFirstSync,                   ("userAgent" .=) <$> _mobUserAgent,                   ("imei" .=) <$> _mobImei, ("type" .=) <$> _mobType,                   ("wifiMacAddress" .=) <$> _mobWifiMACAddress,+                  ("encryptionStatus" .=) <$> _mobEncryptionStatus,                   ("serialNumber" .=) <$> _mobSerialNumber,+                  ("devicePasswordStatus" .=) <$>+                    _mobDevicePasswordStatus,                   ("hardwareId" .=) <$> _mobHardwareId,                   ("basebandVersion" .=) <$> _mobBasebandVersion,                   ("supportsWorkProfile" .=) <$>                     _mobSupportsWorkProFile,+                  ("hardware" .=) <$> _mobHardware,                   ("deviceCompromisedStatus" .=) <$>                     _mobDeviceCompromisedStatus,                   ("applications" .=) <$> _mobApplications,@@ -4969,12 +5123,13 @@ -- -- /See:/ 'member' smart constructor. data Member = Member'-    { _memEmail :: !(Maybe Text)-    , _memEtag  :: !(Maybe Text)-    , _memKind  :: !Text-    , _memRole  :: !(Maybe Text)-    , _memId    :: !(Maybe Text)-    , _memType  :: !(Maybe Text)+    { _memEmail  :: !(Maybe Text)+    , _memStatus :: !(Maybe Text)+    , _memEtag   :: !(Maybe Text)+    , _memKind   :: !Text+    , _memRole   :: !(Maybe Text)+    , _memId     :: !(Maybe Text)+    , _memType   :: !(Maybe Text)     } deriving (Eq,Show,Data,Typeable,Generic)  -- | Creates a value of 'Member' with the minimum fields required to make a request.@@ -4983,6 +5138,8 @@ -- -- * 'memEmail' --+-- * 'memStatus'+-- -- * 'memEtag' -- -- * 'memKind'@@ -4997,6 +5154,7 @@ member =     Member'     { _memEmail = Nothing+    , _memStatus = Nothing     , _memEtag = Nothing     , _memKind = "admin#directory#member"     , _memRole = Nothing@@ -5008,6 +5166,11 @@ memEmail :: Lens' Member (Maybe Text) memEmail = lens _memEmail (\ s a -> s{_memEmail = a}) +-- | Status of member (Immutable)+memStatus :: Lens' Member (Maybe Text)+memStatus+  = lens _memStatus (\ s a -> s{_memStatus = a})+ -- | ETag of the resource. memEtag :: Lens' Member (Maybe Text) memEtag = lens _memEtag (\ s a -> s{_memEtag = a})@@ -5034,8 +5197,9 @@           = withObject "Member"               (\ o ->                  Member' <$>-                   (o .:? "email") <*> (o .:? "etag") <*>-                     (o .:? "kind" .!= "admin#directory#member")+                   (o .:? "email") <*> (o .:? "status") <*>+                     (o .:? "etag")+                     <*> (o .:? "kind" .!= "admin#directory#member")                      <*> (o .:? "role")                      <*> (o .:? "id")                      <*> (o .:? "type"))@@ -5045,6 +5209,7 @@           = object               (catMaybes                  [("email" .=) <$> _memEmail,+                  ("status" .=) <$> _memStatus,                   ("etag" .=) <$> _memEtag, Just ("kind" .= _memKind),                   ("role" .=) <$> _memRole, ("id" .=) <$> _memId,                   ("type" .=) <$> _memType])

@@ -0,0 +1,118 @@+{-# 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.Directory.ChromeosDevices.Action+-- 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)+--+-- Take action on Chrome OS Device+--+-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @directory.chromeosdevices.action@.+module Network.Google.Resource.Directory.ChromeosDevices.Action+    (+    -- * REST Resource+      ChromeosDevicesActionResource++    -- * Creating a Request+    , chromeosDevicesAction+    , ChromeosDevicesAction++    -- * Request Lenses+    , cdaResourceId+    , cdaPayload+    , cdaCustomerId+    ) where++import           Network.Google.Directory.Types+import           Network.Google.Prelude++-- | A resource alias for @directory.chromeosdevices.action@ method which the+-- 'ChromeosDevicesAction' request conforms to.+type ChromeosDevicesActionResource =+     "admin" :>+       "directory" :>+         "v1" :>+           "customer" :>+             Capture "customerId" Text :>+               "devices" :>+                 "chromeos" :>+                   Capture "resourceId" Text :>+                     "action" :>+                       QueryParam "alt" AltJSON :>+                         ReqBody '[JSON] ChromeOSDeviceAction :>+                           Post '[JSON] ()++-- | Take action on Chrome OS Device+--+-- /See:/ 'chromeosDevicesAction' smart constructor.+data ChromeosDevicesAction = ChromeosDevicesAction'+    { _cdaResourceId :: !Text+    , _cdaPayload    :: !ChromeOSDeviceAction+    , _cdaCustomerId :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ChromeosDevicesAction' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cdaResourceId'+--+-- * 'cdaPayload'+--+-- * 'cdaCustomerId'+chromeosDevicesAction+    :: Text -- ^ 'cdaResourceId'+    -> ChromeOSDeviceAction -- ^ 'cdaPayload'+    -> Text -- ^ 'cdaCustomerId'+    -> ChromeosDevicesAction+chromeosDevicesAction pCdaResourceId_ pCdaPayload_ pCdaCustomerId_ =+    ChromeosDevicesAction'+    { _cdaResourceId = pCdaResourceId_+    , _cdaPayload = pCdaPayload_+    , _cdaCustomerId = pCdaCustomerId_+    }++-- | Immutable id of Chrome OS Device+cdaResourceId :: Lens' ChromeosDevicesAction Text+cdaResourceId+  = lens _cdaResourceId+      (\ s a -> s{_cdaResourceId = a})++-- | Multipart request metadata.+cdaPayload :: Lens' ChromeosDevicesAction ChromeOSDeviceAction+cdaPayload+  = lens _cdaPayload (\ s a -> s{_cdaPayload = a})++-- | Immutable id of the Google Apps account+cdaCustomerId :: Lens' ChromeosDevicesAction Text+cdaCustomerId+  = lens _cdaCustomerId+      (\ s a -> s{_cdaCustomerId = a})++instance GoogleRequest ChromeosDevicesAction where+        type Rs ChromeosDevicesAction = ()+        type Scopes ChromeosDevicesAction =+             '["https://www.googleapis.com/auth/admin.directory.device.chromeos"]+        requestClient ChromeosDevicesAction'{..}+          = go _cdaCustomerId _cdaResourceId (Just AltJSON)+              _cdaPayload+              directoryService+          where go+                  = buildClient+                      (Proxy :: Proxy ChromeosDevicesActionResource)+                      mempty

@@ -20,7 +20,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Retrives a customer.+-- Retrieves a customer. -- -- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @directory.customers.get@. module Network.Google.Resource.Directory.Customers.Get@@ -49,7 +49,7 @@              Capture "customerKey" Text :>                QueryParam "alt" AltJSON :> Get '[JSON] Customer --- | Retrives a customer.+-- | Retrieves a customer. -- -- /See:/ 'customersGet' smart constructor. newtype CustomersGet = CustomersGet'

@@ -20,7 +20,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Retrives a domain of the customer.+-- Retrieves a domain of the customer. -- -- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @directory.domains.get@. module Network.Google.Resource.Directory.Domains.Get@@ -52,7 +52,7 @@                  Capture "domainName" Text :>                    QueryParam "alt" AltJSON :> Get '[JSON] Domains --- | Retrives a domain of the customer.+-- | Retrieves a domain of the customer. -- -- /See:/ 'domainsGet' smart constructor. data DomainsGet = DomainsGet'

@@ -1,5 +1,5 @@ name:                  gogol-admin-directory-version:               0.1.0+version:               0.1.1 synopsis:              Google Admin Directory SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -11,7 +11,7 @@ category:              Network, Google, Cloud build-type:            Simple cabal-version:         >= 1.10-extra-source-files:    README.md+extra-source-files:    README.md src/.gitkeep  description:     The Admin SDK Directory API lets you view and manage enterprise@@ -41,6 +41,7 @@         , Network.Google.Resource.Directory.Asps.Delete         , Network.Google.Resource.Directory.Asps.Get         , Network.Google.Resource.Directory.Asps.List+        , Network.Google.Resource.Directory.ChromeosDevices.Action         , Network.Google.Resource.Directory.ChromeosDevices.Get         , Network.Google.Resource.Directory.ChromeosDevices.List         , Network.Google.Resource.Directory.ChromeosDevices.Patch@@ -138,5 +139,5 @@         , Network.Google.Directory.Types.Sum      build-depends:-          gogol-core == 0.1.0.*+          gogol-core == 0.1.1.*         , base       >= 4.7 && < 5