Hello community,
here is the log from the commit of package ghc-gogol-deploymentmanager for
openSUSE:Factory checked in at 2017-08-31 20:53:00
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-gogol-deploymentmanager (Old)
and /work/SRC/openSUSE:Factory/.ghc-gogol-deploymentmanager.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-gogol-deploymentmanager"
Thu Aug 31 20:53:00 2017 rev:2 rq:513298 version:0.3.0
Changes:
--------
---
/work/SRC/openSUSE:Factory/ghc-gogol-deploymentmanager/ghc-gogol-deploymentmanager.changes
2017-05-10 20:40:09.402563522 +0200
+++
/work/SRC/openSUSE:Factory/.ghc-gogol-deploymentmanager.new/ghc-gogol-deploymentmanager.changes
2017-08-31 20:53:01.524400389 +0200
@@ -1,0 +2,5 @@
+Thu Jul 27 14:06:41 UTC 2017 - [email protected]
+
+- Update to version 0.3.0.
+
+-------------------------------------------------------------------
Old:
----
gogol-deploymentmanager-0.1.1.tar.gz
New:
----
gogol-deploymentmanager-0.3.0.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-gogol-deploymentmanager.spec ++++++
--- /var/tmp/diff_new_pack.0RD6yb/_old 2017-08-31 20:53:02.804220569 +0200
+++ /var/tmp/diff_new_pack.0RD6yb/_new 2017-08-31 20:53:02.808220007 +0200
@@ -18,7 +18,7 @@
%global pkg_name gogol-deploymentmanager
Name: ghc-%{pkg_name}
-Version: 0.1.1
+Version: 0.3.0
Release: 0
Summary: Google Cloud Deployment Manager SDK
License: MPL-2.0
++++++ gogol-deploymentmanager-0.1.1.tar.gz ->
gogol-deploymentmanager-0.3.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/gogol-deploymentmanager-0.1.1/README.md
new/gogol-deploymentmanager-0.3.0/README.md
--- old/gogol-deploymentmanager-0.1.1/README.md 2016-11-03 14:26:28.000000000
+0100
+++ new/gogol-deploymentmanager-0.3.0/README.md 2017-07-12 16:51:30.000000000
+0200
@@ -8,7 +8,7 @@
## Version
-`0.1.1`
+`0.3.0`
## Description
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager/Types/Product.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager/Types/Product.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager/Types/Product.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager/Types/Product.hs
2017-07-12 16:51:30.000000000 +0200
@@ -104,12 +104,13 @@
toJSON ConfigFile'{..}
= object (catMaybes [("content" .=) <$> _cfContent])
--- | Enables \"data access\" audit logging for a service and specifies a list
--- of members that are log-exempted.
+-- | Provides the configuration for non-admin_activity logging for a service.
+-- Controls exemptions and specific log sub-types.
--
-- /See:/ 'auditConfig' smart constructor.
data AuditConfig = AuditConfig'
{ _acService :: !(Maybe Text)
+ , _acAuditLogConfigs :: !(Maybe [AuditLogConfig])
, _acExemptedMembers :: !(Maybe [Text])
} deriving (Eq,Show,Data,Typeable,Generic)
@@ -119,22 +120,33 @@
--
-- * 'acService'
--
+-- * 'acAuditLogConfigs'
+--
-- * 'acExemptedMembers'
auditConfig
:: AuditConfig
auditConfig =
AuditConfig'
{ _acService = Nothing
+ , _acAuditLogConfigs = Nothing
, _acExemptedMembers = Nothing
}
--- | Specifies a service that will be enabled for \"data access\" audit
--- logging. For example, \`resourcemanager\`, \`storage\`, \`compute\`.
--- \`allServices\` is a special value that covers all services.
+-- | Specifies a service that will be enabled for audit logging. For example,
+-- \`resourcemanager\`, \`storage\`, \`compute\`. \`allServices\` is a
+-- special value that covers all services.
acService :: Lens' AuditConfig (Maybe Text)
acService
= lens _acService (\ s a -> s{_acService = a})
+-- | The configuration for each type of logging
+acAuditLogConfigs :: Lens' AuditConfig [AuditLogConfig]
+acAuditLogConfigs
+ = lens _acAuditLogConfigs
+ (\ s a -> s{_acAuditLogConfigs = a})
+ . _Default
+ . _Coerce
+
-- | Specifies the identities that are exempted from \"data access\" audit
-- logging for the \`service\` specified above. Follows the same format of
-- Binding.members.
@@ -151,13 +163,15 @@
(\ o ->
AuditConfig' <$>
(o .:? "service") <*>
- (o .:? "exemptedMembers" .!= mempty))
+ (o .:? "auditLogConfigs" .!= mempty)
+ <*> (o .:? "exemptedMembers" .!= mempty))
instance ToJSON AuditConfig where
toJSON AuditConfig'{..}
= object
(catMaybes
[("service" .=) <$> _acService,
+ ("auditLogConfigs" .=) <$> _acAuditLogConfigs,
("exemptedMembers" .=) <$> _acExemptedMembers])
-- | A response containing a partial list of operations and a page token used
@@ -601,9 +615,9 @@
oDescription
= lens _oDescription (\ s a -> s{_oDescription = a})
--- | [Output Only] The URL of the resource that the operation modifies. If
--- creating a persistent disk snapshot, this points to the persistent disk
--- that the snapshot was created from.
+-- | [Output Only] The URL of the resource that the operation modifies. For
+-- operations related to creating a snapshot, this points to the persistent
+-- disk that the snapshot was created from.
oTargetLink :: Lens' Operation (Maybe Text)
oTargetLink
= lens _oTargetLink (\ s a -> s{_oTargetLink = a})
@@ -1305,7 +1319,7 @@
--
-- /See:/ 'deploymentsCancelPreviewRequest' smart constructor.
newtype DeploymentsCancelPreviewRequest = DeploymentsCancelPreviewRequest'
- { _dcprFingerprint :: Maybe Base64
+ { _dcprFingerprint :: Maybe Bytes
} deriving (Eq,Show,Data,Typeable,Generic)
-- | Creates a value of 'DeploymentsCancelPreviewRequest' with the minimum
fields required to make a request.
@@ -1333,7 +1347,7 @@
dcprFingerprint
= lens _dcprFingerprint
(\ s a -> s{_dcprFingerprint = a})
- . mapping _Base64
+ . mapping _Bytes
instance FromJSON DeploymentsCancelPreviewRequest
where
@@ -1720,7 +1734,7 @@
-- /See:/ 'policy' smart constructor.
data Policy = Policy'
{ _pAuditConfigs :: !(Maybe [AuditConfig])
- , _pEtag :: !(Maybe Base64)
+ , _pEtag :: !(Maybe Bytes)
, _pRules :: !(Maybe [Rule])
, _pVersion :: !(Maybe (Textual Int32))
, _pBindings :: !(Maybe [Binding])
@@ -1778,7 +1792,7 @@
pEtag :: Lens' Policy (Maybe ByteString)
pEtag
= lens _pEtag (\ s a -> s{_pEtag = a}) .
- mapping _Base64
+ mapping _Bytes
-- | If more than one rule is specified, the rules are applied in the
-- following manner: - All matching LOG rules are always applied. - If any
@@ -2019,7 +2033,7 @@
--
-- /See:/ 'deploymentsStopRequest' smart constructor.
newtype DeploymentsStopRequest = DeploymentsStopRequest'
- { _dsrFingerprint :: Maybe Base64
+ { _dsrFingerprint :: Maybe Bytes
} deriving (Eq,Show,Data,Typeable,Generic)
-- | Creates a value of 'DeploymentsStopRequest' with the minimum fields
required to make a request.
@@ -2047,7 +2061,7 @@
dsrFingerprint
= lens _dsrFingerprint
(\ s a -> s{_dsrFingerprint = a})
- . mapping _Base64
+ . mapping _Bytes
instance FromJSON DeploymentsStopRequest where
parseJSON
@@ -2111,6 +2125,58 @@
[("value" .=) <$> _rwidiValue,
("key" .=) <$> _rwidiKey])
+-- | Provides the configuration for a sub-type of logging.
+--
+-- /See:/ 'auditLogConfig' smart constructor.
+data AuditLogConfig = AuditLogConfig'
+ { _alcLogType :: !(Maybe Text)
+ , _alcExemptedMembers :: !(Maybe [Text])
+ } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'AuditLogConfig' with the minimum fields required to
make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'alcLogType'
+--
+-- * 'alcExemptedMembers'
+auditLogConfig
+ :: AuditLogConfig
+auditLogConfig =
+ AuditLogConfig'
+ { _alcLogType = Nothing
+ , _alcExemptedMembers = Nothing
+ }
+
+-- | The log type that this config enables.
+alcLogType :: Lens' AuditLogConfig (Maybe Text)
+alcLogType
+ = lens _alcLogType (\ s a -> s{_alcLogType = a})
+
+-- | Specifies the identities that are exempted from this type of logging
+-- Follows the same format of Binding.members.
+alcExemptedMembers :: Lens' AuditLogConfig [Text]
+alcExemptedMembers
+ = lens _alcExemptedMembers
+ (\ s a -> s{_alcExemptedMembers = a})
+ . _Default
+ . _Coerce
+
+instance FromJSON AuditLogConfig where
+ parseJSON
+ = withObject "AuditLogConfig"
+ (\ o ->
+ AuditLogConfig' <$>
+ (o .:? "logType") <*>
+ (o .:? "exemptedMembers" .!= mempty))
+
+instance ToJSON AuditLogConfig where
+ toJSON AuditLogConfig'{..}
+ = object
+ (catMaybes
+ [("logType" .=) <$> _alcLogType,
+ ("exemptedMembers" .=) <$> _alcExemptedMembers])
+
-- | [Output Only] If errors are generated during update of the resource,
-- this field will be populated.
--
@@ -2593,7 +2659,7 @@
data Deployment = Deployment'
{ _dInsertTime :: !(Maybe Text)
, _dOperation :: !(Maybe Operation)
- , _dFingerprint :: !(Maybe Base64)
+ , _dFingerprint :: !(Maybe Bytes)
, _dSelfLink :: !(Maybe Text)
, _dName :: !(Maybe Text)
, _dManifest :: !(Maybe Text)
@@ -2669,7 +2735,7 @@
dFingerprint :: Lens' Deployment (Maybe ByteString)
dFingerprint
= lens _dFingerprint (\ s a -> s{_dFingerprint = a})
- . mapping _Base64
+ . mapping _Bytes
-- | [Output Only] Self link for the deployment.
dSelfLink :: Lens' Deployment (Maybe Text)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager/Types/Sum.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager/Types/Sum.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager/Types/Sum.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager/Types/Sum.hs
2017-07-12 16:51:30.000000000 +0200
@@ -46,26 +46,53 @@
toJSON = toJSONText
-- | Sets the policy to use for deleting resources.
-data DeploymentsUpdateDeletePolicy
+data DeploymentsDeleteDeletePolicy
= Abandon
-- ^ @ABANDON@
| Delete'
-- ^ @DELETE@
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
-instance Hashable DeploymentsUpdateDeletePolicy
+instance Hashable DeploymentsDeleteDeletePolicy
-instance FromHttpApiData DeploymentsUpdateDeletePolicy where
+instance FromHttpApiData DeploymentsDeleteDeletePolicy where
parseQueryParam = \case
"ABANDON" -> Right Abandon
"DELETE" -> Right Delete'
- x -> Left ("Unable to parse DeploymentsUpdateDeletePolicy from: " <> x)
+ x -> Left ("Unable to parse DeploymentsDeleteDeletePolicy from: " <> x)
-instance ToHttpApiData DeploymentsUpdateDeletePolicy where
+instance ToHttpApiData DeploymentsDeleteDeletePolicy where
toQueryParam = \case
Abandon -> "ABANDON"
Delete' -> "DELETE"
+instance FromJSON DeploymentsDeleteDeletePolicy where
+ parseJSON = parseJSONText "DeploymentsDeleteDeletePolicy"
+
+instance ToJSON DeploymentsDeleteDeletePolicy where
+ toJSON = toJSONText
+
+-- | Sets the policy to use for deleting resources.
+data DeploymentsUpdateDeletePolicy
+ = DUDPAbandon
+ -- ^ @ABANDON@
+ | DUDPDelete'
+ -- ^ @DELETE@
+ deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
+
+instance Hashable DeploymentsUpdateDeletePolicy
+
+instance FromHttpApiData DeploymentsUpdateDeletePolicy where
+ parseQueryParam = \case
+ "ABANDON" -> Right DUDPAbandon
+ "DELETE" -> Right DUDPDelete'
+ x -> Left ("Unable to parse DeploymentsUpdateDeletePolicy from: " <> x)
+
+instance ToHttpApiData DeploymentsUpdateDeletePolicy where
+ toQueryParam = \case
+ DUDPAbandon -> "ABANDON"
+ DUDPDelete' -> "DELETE"
+
instance FromJSON DeploymentsUpdateDeletePolicy where
parseJSON = parseJSONText "DeploymentsUpdateDeletePolicy"
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager/Types.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager/Types.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager/Types.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager/Types.hs
2017-07-12 16:51:30.000000000 +0200
@@ -40,6 +40,7 @@
, AuditConfig
, auditConfig
, acService
+ , acAuditLogConfigs
, acExemptedMembers
-- * DeploymentsUpdateCreatePolicy
@@ -57,6 +58,9 @@
, ruwidiValue
, ruwidiKey
+ -- * DeploymentsDeleteDeletePolicy
+ , DeploymentsDeleteDeletePolicy (..)
+
-- * TypesListResponse
, TypesListResponse
, typesListResponse
@@ -263,6 +267,12 @@
, rwidiValue
, rwidiKey
+ -- * AuditLogConfig
+ , AuditLogConfig
+ , auditLogConfig
+ , alcLogType
+ , alcExemptedMembers
+
-- * ResourceUpdateError
, ResourceUpdateError
, resourceUpdateError
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager.hs
--- old/gogol-deploymentmanager-0.1.1/gen/Network/Google/DeploymentManager.hs
2016-11-03 14:26:28.000000000 +0100
+++ new/gogol-deploymentmanager-0.3.0/gen/Network/Google/DeploymentManager.hs
2017-07-12 16:51:30.000000000 +0200
@@ -104,6 +104,7 @@
, AuditConfig
, auditConfig
, acService
+ , acAuditLogConfigs
, acExemptedMembers
-- ** DeploymentsUpdateCreatePolicy
@@ -121,6 +122,9 @@
, ruwidiValue
, ruwidiKey
+ -- ** DeploymentsDeleteDeletePolicy
+ , DeploymentsDeleteDeletePolicy (..)
+
-- ** TypesListResponse
, TypesListResponse
, typesListResponse
@@ -327,6 +331,12 @@
, rwidiValue
, rwidiKey
+ -- ** AuditLogConfig
+ , AuditLogConfig
+ , auditLogConfig
+ , alcLogType
+ , alcExemptedMembers
+
-- ** ResourceUpdateError
, ResourceUpdateError
, resourceUpdateError
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
2017-07-12 16:51:30.000000000 +0200
@@ -34,6 +34,7 @@
-- * Request Lenses
, ddProject
+ , ddDeletePolicy
, ddDeployment
) where
@@ -50,14 +51,18 @@
"global" :>
"deployments" :>
Capture "deployment" Text :>
- QueryParam "alt" AltJSON :> Delete '[JSON] Operation
+ QueryParam "deletePolicy"
+ DeploymentsDeleteDeletePolicy
+ :>
+ QueryParam "alt" AltJSON :> Delete '[JSON] Operation
-- | Deletes a deployment and all of the resources in the deployment.
--
-- /See:/ 'deploymentsDelete' smart constructor.
data DeploymentsDelete = DeploymentsDelete'
- { _ddProject :: !Text
- , _ddDeployment :: !Text
+ { _ddProject :: !Text
+ , _ddDeletePolicy :: !DeploymentsDeleteDeletePolicy
+ , _ddDeployment :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
-- | Creates a value of 'DeploymentsDelete' with the minimum fields required
to make a request.
@@ -66,6 +71,8 @@
--
-- * 'ddProject'
--
+-- * 'ddDeletePolicy'
+--
-- * 'ddDeployment'
deploymentsDelete
:: Text -- ^ 'ddProject'
@@ -74,6 +81,7 @@
deploymentsDelete pDdProject_ pDdDeployment_ =
DeploymentsDelete'
{ _ddProject = pDdProject_
+ , _ddDeletePolicy = Delete'
, _ddDeployment = pDdDeployment_
}
@@ -82,6 +90,12 @@
ddProject
= lens _ddProject (\ s a -> s{_ddProject = a})
+-- | Sets the policy to use for deleting resources.
+ddDeletePolicy :: Lens' DeploymentsDelete DeploymentsDeleteDeletePolicy
+ddDeletePolicy
+ = lens _ddDeletePolicy
+ (\ s a -> s{_ddDeletePolicy = a})
+
-- | The name of the deployment for this request.
ddDeployment :: Lens' DeploymentsDelete Text
ddDeployment
@@ -93,7 +107,8 @@
'["https://www.googleapis.com/auth/cloud-platform";,
"https://www.googleapis.com/auth/ndev.cloudman";]
requestClient DeploymentsDelete'{..}
- = go _ddProject _ddDeployment (Just AltJSON)
+ = go _ddProject _ddDeployment (Just _ddDeletePolicy)
+ (Just AltJSON)
deploymentManagerService
where go
= buildClient
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
2017-07-12 16:51:30.000000000 +0200
@@ -33,6 +33,7 @@
, DeploymentsList
-- * Request Lenses
+ , dlOrderBy
, dlProject
, dlFilter
, dlPageToken
@@ -51,17 +52,19 @@
Capture "project" Text :>
"global" :>
"deployments" :>
- QueryParam "filter" Text :>
- QueryParam "pageToken" Text :>
- QueryParam "maxResults" (Textual Word32) :>
- QueryParam "alt" AltJSON :>
- Get '[JSON] DeploymentsListResponse
+ QueryParam "orderBy" Text :>
+ QueryParam "filter" Text :>
+ QueryParam "pageToken" Text :>
+ QueryParam "maxResults" (Textual Word32) :>
+ QueryParam "alt" AltJSON :>
+ Get '[JSON] DeploymentsListResponse
-- | Lists all deployments for a given project.
--
-- /See:/ 'deploymentsList' smart constructor.
data DeploymentsList = DeploymentsList'
- { _dlProject :: !Text
+ { _dlOrderBy :: !(Maybe Text)
+ , _dlProject :: !Text
, _dlFilter :: !(Maybe Text)
, _dlPageToken :: !(Maybe Text)
, _dlMaxResults :: !(Textual Word32)
@@ -71,6 +74,8 @@
--
-- Use one of the following lenses to modify other fields as desired:
--
+-- * 'dlOrderBy'
+--
-- * 'dlProject'
--
-- * 'dlFilter'
@@ -83,12 +88,25 @@
-> DeploymentsList
deploymentsList pDlProject_ =
DeploymentsList'
- { _dlProject = pDlProject_
+ { _dlOrderBy = Nothing
+ , _dlProject = pDlProject_
, _dlFilter = Nothing
, _dlPageToken = Nothing
, _dlMaxResults = 500
}
+-- | Sorts list results by a certain order. By default, results are returned
+-- in alphanumerical order based on the resource name. You can also sort
+-- results in descending order based on the creation timestamp using
+-- orderBy=\"creationTimestamp desc\". This sorts results based on the
+-- creationTimestamp field in reverse chronological order (newest result
+-- first). Use this to sort resources like operations so that the newest
+-- operation is returned first. Currently, only sorting by name or
+-- creationTimestamp desc is supported.
+dlOrderBy :: Lens' DeploymentsList (Maybe Text)
+dlOrderBy
+ = lens _dlOrderBy (\ s a -> s{_dlOrderBy = a})
+
-- | The project ID for this request.
dlProject :: Lens' DeploymentsList Text
dlProject
@@ -140,7 +158,7 @@
"https://www.googleapis.com/auth/ndev.cloudman";,
"https://www.googleapis.com/auth/ndev.cloudman.readonly";]
requestClient DeploymentsList'{..}
- = go _dlProject _dlFilter _dlPageToken
+ = go _dlProject _dlOrderBy _dlFilter _dlPageToken
(Just _dlMaxResults)
(Just AltJSON)
deploymentManagerService
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
2017-07-12 16:51:30.000000000 +0200
@@ -103,7 +103,7 @@
{ _duCreatePolicy = CreateOrAcquire
, _duProject = pDuProject_
, _duPayload = pDuPayload_
- , _duDeletePolicy = Delete'
+ , _duDeletePolicy = DUDPDelete'
, _duPreview = False
, _duDeployment = pDuDeployment_
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
2017-07-12 16:51:30.000000000 +0200
@@ -33,6 +33,7 @@
, ManifestsList
-- * Request Lenses
+ , mlOrderBy
, mlProject
, mlFilter
, mlPageToken
@@ -54,17 +55,19 @@
"deployments" :>
Capture "deployment" Text :>
"manifests" :>
- QueryParam "filter" Text :>
- QueryParam "pageToken" Text :>
- QueryParam "maxResults" (Textual Word32) :>
- QueryParam "alt" AltJSON :>
- Get '[JSON] ManifestsListResponse
+ QueryParam "orderBy" Text :>
+ QueryParam "filter" Text :>
+ QueryParam "pageToken" Text :>
+ QueryParam "maxResults" (Textual Word32) :>
+ QueryParam "alt" AltJSON :>
+ Get '[JSON] ManifestsListResponse
-- | Lists all manifests for a given deployment.
--
-- /See:/ 'manifestsList' smart constructor.
data ManifestsList = ManifestsList'
- { _mlProject :: !Text
+ { _mlOrderBy :: !(Maybe Text)
+ , _mlProject :: !Text
, _mlFilter :: !(Maybe Text)
, _mlPageToken :: !(Maybe Text)
, _mlMaxResults :: !(Textual Word32)
@@ -75,6 +78,8 @@
--
-- Use one of the following lenses to modify other fields as desired:
--
+-- * 'mlOrderBy'
+--
-- * 'mlProject'
--
-- * 'mlFilter'
@@ -90,13 +95,26 @@
-> ManifestsList
manifestsList pMlProject_ pMlDeployment_ =
ManifestsList'
- { _mlProject = pMlProject_
+ { _mlOrderBy = Nothing
+ , _mlProject = pMlProject_
, _mlFilter = Nothing
, _mlPageToken = Nothing
, _mlMaxResults = 500
, _mlDeployment = pMlDeployment_
}
+-- | Sorts list results by a certain order. By default, results are returned
+-- in alphanumerical order based on the resource name. You can also sort
+-- results in descending order based on the creation timestamp using
+-- orderBy=\"creationTimestamp desc\". This sorts results based on the
+-- creationTimestamp field in reverse chronological order (newest result
+-- first). Use this to sort resources like operations so that the newest
+-- operation is returned first. Currently, only sorting by name or
+-- creationTimestamp desc is supported.
+mlOrderBy :: Lens' ManifestsList (Maybe Text)
+mlOrderBy
+ = lens _mlOrderBy (\ s a -> s{_mlOrderBy = a})
+
-- | The project ID for this request.
mlProject :: Lens' ManifestsList Text
mlProject
@@ -153,7 +171,8 @@
"https://www.googleapis.com/auth/ndev.cloudman";,
"https://www.googleapis.com/auth/ndev.cloudman.readonly";]
requestClient ManifestsList'{..}
- = go _mlProject _mlDeployment _mlFilter _mlPageToken
+ = go _mlProject _mlDeployment _mlOrderBy _mlFilter
+ _mlPageToken
(Just _mlMaxResults)
(Just AltJSON)
deploymentManagerService
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
2017-07-12 16:51:30.000000000 +0200
@@ -33,6 +33,7 @@
, OperationsList
-- * Request Lenses
+ , olOrderBy
, olProject
, olFilter
, olPageToken
@@ -51,17 +52,19 @@
Capture "project" Text :>
"global" :>
"operations" :>
- QueryParam "filter" Text :>
- QueryParam "pageToken" Text :>
- QueryParam "maxResults" (Textual Word32) :>
- QueryParam "alt" AltJSON :>
- Get '[JSON] OperationsListResponse
+ QueryParam "orderBy" Text :>
+ QueryParam "filter" Text :>
+ QueryParam "pageToken" Text :>
+ QueryParam "maxResults" (Textual Word32) :>
+ QueryParam "alt" AltJSON :>
+ Get '[JSON] OperationsListResponse
-- | Lists all operations for a project.
--
-- /See:/ 'operationsList' smart constructor.
data OperationsList = OperationsList'
- { _olProject :: !Text
+ { _olOrderBy :: !(Maybe Text)
+ , _olProject :: !Text
, _olFilter :: !(Maybe Text)
, _olPageToken :: !(Maybe Text)
, _olMaxResults :: !(Textual Word32)
@@ -71,6 +74,8 @@
--
-- Use one of the following lenses to modify other fields as desired:
--
+-- * 'olOrderBy'
+--
-- * 'olProject'
--
-- * 'olFilter'
@@ -83,12 +88,25 @@
-> OperationsList
operationsList pOlProject_ =
OperationsList'
- { _olProject = pOlProject_
+ { _olOrderBy = Nothing
+ , _olProject = pOlProject_
, _olFilter = Nothing
, _olPageToken = Nothing
, _olMaxResults = 500
}
+-- | Sorts list results by a certain order. By default, results are returned
+-- in alphanumerical order based on the resource name. You can also sort
+-- results in descending order based on the creation timestamp using
+-- orderBy=\"creationTimestamp desc\". This sorts results based on the
+-- creationTimestamp field in reverse chronological order (newest result
+-- first). Use this to sort resources like operations so that the newest
+-- operation is returned first. Currently, only sorting by name or
+-- creationTimestamp desc is supported.
+olOrderBy :: Lens' OperationsList (Maybe Text)
+olOrderBy
+ = lens _olOrderBy (\ s a -> s{_olOrderBy = a})
+
-- | The project ID for this request.
olProject :: Lens' OperationsList Text
olProject
@@ -140,7 +158,7 @@
"https://www.googleapis.com/auth/ndev.cloudman";,
"https://www.googleapis.com/auth/ndev.cloudman.readonly";]
requestClient OperationsList'{..}
- = go _olProject _olFilter _olPageToken
+ = go _olProject _olOrderBy _olFilter _olPageToken
(Just _olMaxResults)
(Just AltJSON)
deploymentManagerService
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
2017-07-12 16:51:30.000000000 +0200
@@ -33,6 +33,7 @@
, ResourcesList
-- * Request Lenses
+ , rlOrderBy
, rlProject
, rlFilter
, rlPageToken
@@ -54,17 +55,19 @@
"deployments" :>
Capture "deployment" Text :>
"resources" :>
- QueryParam "filter" Text :>
- QueryParam "pageToken" Text :>
- QueryParam "maxResults" (Textual Word32) :>
- QueryParam "alt" AltJSON :>
- Get '[JSON] ResourcesListResponse
+ QueryParam "orderBy" Text :>
+ QueryParam "filter" Text :>
+ QueryParam "pageToken" Text :>
+ QueryParam "maxResults" (Textual Word32) :>
+ QueryParam "alt" AltJSON :>
+ Get '[JSON] ResourcesListResponse
-- | Lists all resources in a given deployment.
--
-- /See:/ 'resourcesList' smart constructor.
data ResourcesList = ResourcesList'
- { _rlProject :: !Text
+ { _rlOrderBy :: !(Maybe Text)
+ , _rlProject :: !Text
, _rlFilter :: !(Maybe Text)
, _rlPageToken :: !(Maybe Text)
, _rlMaxResults :: !(Textual Word32)
@@ -75,6 +78,8 @@
--
-- Use one of the following lenses to modify other fields as desired:
--
+-- * 'rlOrderBy'
+--
-- * 'rlProject'
--
-- * 'rlFilter'
@@ -90,13 +95,26 @@
-> ResourcesList
resourcesList pRlProject_ pRlDeployment_ =
ResourcesList'
- { _rlProject = pRlProject_
+ { _rlOrderBy = Nothing
+ , _rlProject = pRlProject_
, _rlFilter = Nothing
, _rlPageToken = Nothing
, _rlMaxResults = 500
, _rlDeployment = pRlDeployment_
}
+-- | Sorts list results by a certain order. By default, results are returned
+-- in alphanumerical order based on the resource name. You can also sort
+-- results in descending order based on the creation timestamp using
+-- orderBy=\"creationTimestamp desc\". This sorts results based on the
+-- creationTimestamp field in reverse chronological order (newest result
+-- first). Use this to sort resources like operations so that the newest
+-- operation is returned first. Currently, only sorting by name or
+-- creationTimestamp desc is supported.
+rlOrderBy :: Lens' ResourcesList (Maybe Text)
+rlOrderBy
+ = lens _rlOrderBy (\ s a -> s{_rlOrderBy = a})
+
-- | The project ID for this request.
rlProject :: Lens' ResourcesList Text
rlProject
@@ -153,7 +171,8 @@
"https://www.googleapis.com/auth/ndev.cloudman";,
"https://www.googleapis.com/auth/ndev.cloudman.readonly";]
requestClient ResourcesList'{..}
- = go _rlProject _rlDeployment _rlFilter _rlPageToken
+ = go _rlProject _rlDeployment _rlOrderBy _rlFilter
+ _rlPageToken
(Just _rlMaxResults)
(Just AltJSON)
deploymentManagerService
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
---
old/gogol-deploymentmanager-0.1.1/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
2016-11-03 14:26:28.000000000 +0100
+++
new/gogol-deploymentmanager-0.3.0/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
2017-07-12 16:51:30.000000000 +0200
@@ -33,6 +33,7 @@
, TypesList
-- * Request Lenses
+ , tlOrderBy
, tlProject
, tlFilter
, tlPageToken
@@ -51,17 +52,19 @@
Capture "project" Text :>
"global" :>
"types" :>
- QueryParam "filter" Text :>
- QueryParam "pageToken" Text :>
- QueryParam "maxResults" (Textual Word32) :>
- QueryParam "alt" AltJSON :>
- Get '[JSON] TypesListResponse
+ QueryParam "orderBy" Text :>
+ QueryParam "filter" Text :>
+ QueryParam "pageToken" Text :>
+ QueryParam "maxResults" (Textual Word32) :>
+ QueryParam "alt" AltJSON :>
+ Get '[JSON] TypesListResponse
-- | Lists all resource types for Deployment Manager.
--
-- /See:/ 'typesList' smart constructor.
data TypesList = TypesList'
- { _tlProject :: !Text
+ { _tlOrderBy :: !(Maybe Text)
+ , _tlProject :: !Text
, _tlFilter :: !(Maybe Text)
, _tlPageToken :: !(Maybe Text)
, _tlMaxResults :: !(Textual Word32)
@@ -71,6 +74,8 @@
--
-- Use one of the following lenses to modify other fields as desired:
--
+-- * 'tlOrderBy'
+--
-- * 'tlProject'
--
-- * 'tlFilter'
@@ -83,12 +88,25 @@
-> TypesList
typesList pTlProject_ =
TypesList'
- { _tlProject = pTlProject_
+ { _tlOrderBy = Nothing
+ , _tlProject = pTlProject_
, _tlFilter = Nothing
, _tlPageToken = Nothing
, _tlMaxResults = 500
}
+-- | Sorts list results by a certain order. By default, results are returned
+-- in alphanumerical order based on the resource name. You can also sort
+-- results in descending order based on the creation timestamp using
+-- orderBy=\"creationTimestamp desc\". This sorts results based on the
+-- creationTimestamp field in reverse chronological order (newest result
+-- first). Use this to sort resources like operations so that the newest
+-- operation is returned first. Currently, only sorting by name or
+-- creationTimestamp desc is supported.
+tlOrderBy :: Lens' TypesList (Maybe Text)
+tlOrderBy
+ = lens _tlOrderBy (\ s a -> s{_tlOrderBy = a})
+
-- | The project ID for this request.
tlProject :: Lens' TypesList Text
tlProject
@@ -140,7 +158,7 @@
"https://www.googleapis.com/auth/ndev.cloudman";,
"https://www.googleapis.com/auth/ndev.cloudman.readonly";]
requestClient TypesList'{..}
- = go _tlProject _tlFilter _tlPageToken
+ = go _tlProject _tlOrderBy _tlFilter _tlPageToken
(Just _tlMaxResults)
(Just AltJSON)
deploymentManagerService
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-deploymentmanager-0.1.1/gogol-deploymentmanager.cabal
new/gogol-deploymentmanager-0.3.0/gogol-deploymentmanager.cabal
--- old/gogol-deploymentmanager-0.1.1/gogol-deploymentmanager.cabal
2016-11-03 14:26:28.000000000 +0100
+++ new/gogol-deploymentmanager-0.3.0/gogol-deploymentmanager.cabal
2017-07-12 16:51:30.000000000 +0200
@@ -1,5 +1,5 @@
name: gogol-deploymentmanager
-version: 0.1.1
+version: 0.3.0
synopsis: Google Cloud Deployment Manager SDK.
homepage: https://github.com/brendanhay/gogol
bug-reports: https://github.com/brendanhay/gogol/issues
@@ -60,5 +60,5 @@
, Network.Google.DeploymentManager.Types.Sum
build-depends:
- gogol-core == 0.1.1.*
+ gogol-core == 0.3.0.*
, base >= 4.7 && < 5
