diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`0.0.1`
+`0.1.0`
 
 
 ## Description
@@ -18,9 +18,9 @@
 
 ## Contribute
 
-For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/amazonka/issues).
+For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/gogol/issues).
 
-> _Note:_ this library is an auto-generated Haskell package. Please see `amazonka-gen` for more information.
+> _Note:_ this library is an auto-generated Haskell package. Please see `gogol-gen` for more information.
 
 
 ## Licence
diff --git a/gen/Network/Google/DeploymentManager.hs b/gen/Network/Google/DeploymentManager.hs
--- a/gen/Network/Google/DeploymentManager.hs
+++ b/gen/Network/Google/DeploymentManager.hs
@@ -7,14 +7,14 @@
 
 -- |
 -- Module      : Network.Google.DeploymentManager
--- Copyright   : (c) 2015 Brendan Hay
+-- 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)
 --
--- The Deployment Manager API allows users to declaratively configure,
--- deploy and run complex solutions on the Google Cloud Platform.
+-- Declares, configures, and deploys complex solutions on Google Cloud
+-- Platform.
 --
 -- /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference>
 module Network.Google.DeploymentManager
@@ -22,6 +22,12 @@
     -- * Service Configuration
       deploymentManagerService
 
+    -- * OAuth Scopes
+    , cloudPlatformReadOnlyScope
+    , cloudPlatformScope
+    , ndevCloudmanScope
+    , ndevCloudmanReadOnlyScope
+
     -- * API Declaration
     , DeploymentManagerAPI
 
@@ -135,6 +141,7 @@
     , oId
     , oOperationType
     , oRegion
+    , oDescription
     , oTargetLink
     , oClientOperationId
 
@@ -151,6 +158,7 @@
     , DeploymentUpdate
     , deploymentUpdate
     , duManifest
+    , duLabels
 
     -- ** ResourceUpdate
     , ResourceUpdate
@@ -163,6 +171,12 @@
     , ruFinalProperties
     , ruProperties
 
+    -- ** DeploymentLabelEntry
+    , DeploymentLabelEntry
+    , deploymentLabelEntry
+    , dleValue
+    , dleKey
+
     -- ** Manifest
     , Manifest
     , manifest
@@ -202,6 +216,12 @@
     , rUpdate
     , rProperties
 
+    -- ** DeploymentUpdateLabelEntry
+    , DeploymentUpdateLabelEntry
+    , deploymentUpdateLabelEntry
+    , duleValue
+    , duleKey
+
     -- ** ResourceUpdateErrorErrorsItem
     , ResourceUpdateErrorErrorsItem
     , resourceUpdateErrorErrorsItem
@@ -289,9 +309,11 @@
     , dInsertTime
     , dOperation
     , dFingerprint
+    , dSelfLink
     , dName
     , dManifest
     , dId
+    , dLabels
     , dDescription
     , dUpdate
     , dTarget
diff --git a/gen/Network/Google/DeploymentManager/Types.hs b/gen/Network/Google/DeploymentManager/Types.hs
--- a/gen/Network/Google/DeploymentManager/Types.hs
+++ b/gen/Network/Google/DeploymentManager/Types.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE DataKinds          #-}
 {-# LANGUAGE DeriveDataTypeable #-}
 {-# LANGUAGE DeriveGeneric      #-}
 {-# LANGUAGE NoImplicitPrelude  #-}
@@ -7,7 +8,7 @@
 
 -- |
 -- Module      : Network.Google.DeploymentManager.Types
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -22,7 +23,7 @@
     , cloudPlatformReadOnlyScope
     , cloudPlatformScope
     , ndevCloudmanScope
-    , ndevCloudmanReadonlyScope
+    , ndevCloudmanReadOnlyScope
 
     -- * OperationWarningsItemDataItem
     , OperationWarningsItemDataItem
@@ -85,6 +86,7 @@
     , oId
     , oOperationType
     , oRegion
+    , oDescription
     , oTargetLink
     , oClientOperationId
 
@@ -101,6 +103,7 @@
     , DeploymentUpdate
     , deploymentUpdate
     , duManifest
+    , duLabels
 
     -- * ResourceUpdate
     , ResourceUpdate
@@ -113,6 +116,12 @@
     , ruFinalProperties
     , ruProperties
 
+    -- * DeploymentLabelEntry
+    , DeploymentLabelEntry
+    , deploymentLabelEntry
+    , dleValue
+    , dleKey
+
     -- * Manifest
     , Manifest
     , manifest
@@ -152,6 +161,12 @@
     , rUpdate
     , rProperties
 
+    -- * DeploymentUpdateLabelEntry
+    , DeploymentUpdateLabelEntry
+    , deploymentUpdateLabelEntry
+    , duleValue
+    , duleKey
+
     -- * ResourceUpdateErrorErrorsItem
     , ResourceUpdateErrorErrorsItem
     , resourceUpdateErrorErrorsItem
@@ -239,9 +254,11 @@
     , dInsertTime
     , dOperation
     , dFingerprint
+    , dSelfLink
     , dName
     , dManifest
     , dId
+    , dLabels
     , dDescription
     , dUpdate
     , dTarget
@@ -252,25 +269,25 @@
 import           Network.Google.Prelude
 
 -- | Default request referring to version 'v2' of the Google Cloud Deployment Manager API. This contains the host and root path used as a starting point for constructing service requests.
-deploymentManagerService :: Service
+deploymentManagerService :: ServiceConfig
 deploymentManagerService
   = defaultService (ServiceId "deploymentmanager:v2")
       "www.googleapis.com"
 
 -- | View your data across Google Cloud Platform services
-cloudPlatformReadOnlyScope :: OAuthScope
-cloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
+cloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
+cloudPlatformReadOnlyScope = Proxy;
 
 -- | View and manage your data across Google Cloud Platform services
-cloudPlatformScope :: OAuthScope
-cloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
+cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
+cloudPlatformScope = Proxy;
 
 -- | View and manage your Google Cloud Platform management resources and
 -- deployment status information
-ndevCloudmanScope :: OAuthScope
-ndevCloudmanScope = "https://www.googleapis.com/auth/ndev.cloudman";
+ndevCloudmanScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman"]
+ndevCloudmanScope = Proxy;
 
 -- | View your Google Cloud Platform management resources and deployment
 -- status information
-ndevCloudmanReadonlyScope :: OAuthScope
-ndevCloudmanReadonlyScope = "https://www.googleapis.com/auth/ndev.cloudman.readonly";
+ndevCloudmanReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+ndevCloudmanReadOnlyScope = Proxy;
diff --git a/gen/Network/Google/DeploymentManager/Types/Product.hs b/gen/Network/Google/DeploymentManager/Types/Product.hs
--- a/gen/Network/Google/DeploymentManager/Types/Product.hs
+++ b/gen/Network/Google/DeploymentManager/Types/Product.hs
@@ -9,7 +9,7 @@
 
 -- |
 -- Module      : Network.Google.DeploymentManager.Types.Product
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -22,7 +22,7 @@
 
 --
 -- /See:/ 'operationWarningsItemDataItem' smart constructor.
-data OperationWarningsItemDataItem = OperationWarningsItemDataItem
+data OperationWarningsItemDataItem = OperationWarningsItemDataItem'
     { _owidiValue :: !(Maybe Text)
     , _owidiKey   :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -37,7 +37,7 @@
 operationWarningsItemDataItem
     :: OperationWarningsItemDataItem
 operationWarningsItemDataItem =
-    OperationWarningsItemDataItem
+    OperationWarningsItemDataItem'
     { _owidiValue = Nothing
     , _owidiKey = Nothing
     }
@@ -47,7 +47,13 @@
 owidiValue
   = lens _owidiValue (\ s a -> s{_owidiValue = a})
 
--- | [Output Only] A key for the warning data.
+-- | [Output Only] A key that provides more detail on the warning being
+-- returned. For example, for warnings where there are no results in a list
+-- request for a particular zone, this key might be scope and the key value
+-- might be the zone name. Other examples might be a key indicating a
+-- deprecated resource and a suggested replacement, or a warning about
+-- invalid network settings (for example, if an instance attempts to
+-- perform IP forwarding but is not enabled for IP forwarding).
 owidiKey :: Lens' OperationWarningsItemDataItem (Maybe Text)
 owidiKey = lens _owidiKey (\ s a -> s{_owidiKey = a})
 
@@ -55,11 +61,11 @@
         parseJSON
           = withObject "OperationWarningsItemDataItem"
               (\ o ->
-                 OperationWarningsItemDataItem <$>
+                 OperationWarningsItemDataItem' <$>
                    (o .:? "value") <*> (o .:? "key"))
 
 instance ToJSON OperationWarningsItemDataItem where
-        toJSON OperationWarningsItemDataItem{..}
+        toJSON OperationWarningsItemDataItem'{..}
           = object
               (catMaybes
                  [("value" .=) <$> _owidiValue,
@@ -68,7 +74,7 @@
 -- |
 --
 -- /See:/ 'configFile' smart constructor.
-newtype ConfigFile = ConfigFile
+newtype ConfigFile = ConfigFile'
     { _cfContent :: Maybe Text
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -80,7 +86,7 @@
 configFile
     :: ConfigFile
 configFile =
-    ConfigFile
+    ConfigFile'
     { _cfContent = Nothing
     }
 
@@ -92,17 +98,17 @@
 instance FromJSON ConfigFile where
         parseJSON
           = withObject "ConfigFile"
-              (\ o -> ConfigFile <$> (o .:? "content"))
+              (\ o -> ConfigFile' <$> (o .:? "content"))
 
 instance ToJSON ConfigFile where
-        toJSON ConfigFile{..}
+        toJSON ConfigFile'{..}
           = object (catMaybes [("content" .=) <$> _cfContent])
 
 -- | A response containing a partial list of operations and a page token used
 -- to build the next request if the request has been truncated.
 --
 -- /See:/ 'operationsListResponse' smart constructor.
-data OperationsListResponse = OperationsListResponse
+data OperationsListResponse = OperationsListResponse'
     { _olrNextPageToken :: !(Maybe Text)
     , _olrOperations    :: !(Maybe [Operation])
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -117,7 +123,7 @@
 operationsListResponse
     :: OperationsListResponse
 operationsListResponse =
-    OperationsListResponse
+    OperationsListResponse'
     { _olrNextPageToken = Nothing
     , _olrOperations = Nothing
     }
@@ -140,12 +146,12 @@
         parseJSON
           = withObject "OperationsListResponse"
               (\ o ->
-                 OperationsListResponse <$>
+                 OperationsListResponse' <$>
                    (o .:? "nextPageToken") <*>
                      (o .:? "operations" .!= mempty))
 
 instance ToJSON OperationsListResponse where
-        toJSON OperationsListResponse{..}
+        toJSON OperationsListResponse'{..}
           = object
               (catMaybes
                  [("nextPageToken" .=) <$> _olrNextPageToken,
@@ -153,7 +159,7 @@
 
 --
 -- /See:/ 'resourceUpdateWarningsItemDataItem' smart constructor.
-data ResourceUpdateWarningsItemDataItem = ResourceUpdateWarningsItemDataItem
+data ResourceUpdateWarningsItemDataItem = ResourceUpdateWarningsItemDataItem'
     { _ruwidiValue :: !(Maybe Text)
     , _ruwidiKey   :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -168,7 +174,7 @@
 resourceUpdateWarningsItemDataItem
     :: ResourceUpdateWarningsItemDataItem
 resourceUpdateWarningsItemDataItem =
-    ResourceUpdateWarningsItemDataItem
+    ResourceUpdateWarningsItemDataItem'
     { _ruwidiValue = Nothing
     , _ruwidiKey = Nothing
     }
@@ -178,7 +184,13 @@
 ruwidiValue
   = lens _ruwidiValue (\ s a -> s{_ruwidiValue = a})
 
--- | [Output Only] A key for the warning data.
+-- | [Output Only] A key that provides more detail on the warning being
+-- returned. For example, for warnings where there are no results in a list
+-- request for a particular zone, this key might be scope and the key value
+-- might be the zone name. Other examples might be a key indicating a
+-- deprecated resource and a suggested replacement, or a warning about
+-- invalid network settings (for example, if an instance attempts to
+-- perform IP forwarding but is not enabled for IP forwarding).
 ruwidiKey :: Lens' ResourceUpdateWarningsItemDataItem (Maybe Text)
 ruwidiKey
   = lens _ruwidiKey (\ s a -> s{_ruwidiKey = a})
@@ -188,12 +200,12 @@
         parseJSON
           = withObject "ResourceUpdateWarningsItemDataItem"
               (\ o ->
-                 ResourceUpdateWarningsItemDataItem <$>
+                 ResourceUpdateWarningsItemDataItem' <$>
                    (o .:? "value") <*> (o .:? "key"))
 
 instance ToJSON ResourceUpdateWarningsItemDataItem
          where
-        toJSON ResourceUpdateWarningsItemDataItem{..}
+        toJSON ResourceUpdateWarningsItemDataItem'{..}
           = object
               (catMaybes
                  [("value" .=) <$> _ruwidiValue,
@@ -202,7 +214,7 @@
 -- | A response that returns all Types supported by Deployment Manager
 --
 -- /See:/ 'typesListResponse' smart constructor.
-data TypesListResponse = TypesListResponse
+data TypesListResponse = TypesListResponse'
     { _tlrNextPageToken :: !(Maybe Text)
     , _tlrTypes         :: !(Maybe [Type])
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -217,7 +229,7 @@
 typesListResponse
     :: TypesListResponse
 typesListResponse =
-    TypesListResponse
+    TypesListResponse'
     { _tlrNextPageToken = Nothing
     , _tlrTypes = Nothing
     }
@@ -239,12 +251,12 @@
         parseJSON
           = withObject "TypesListResponse"
               (\ o ->
-                 TypesListResponse <$>
+                 TypesListResponse' <$>
                    (o .:? "nextPageToken") <*>
                      (o .:? "types" .!= mempty))
 
 instance ToJSON TypesListResponse where
-        toJSON TypesListResponse{..}
+        toJSON TypesListResponse'{..}
           = object
               (catMaybes
                  [("nextPageToken" .=) <$> _tlrNextPageToken,
@@ -253,7 +265,7 @@
 -- | An Operation resource, used to manage asynchronous API requests.
 --
 -- /See:/ 'operation' smart constructor.
-data Operation = Operation
+data Operation = Operation'
     { _oTargetId            :: !(Maybe (Textual Word64))
     , _oStatus              :: !(Maybe Text)
     , _oInsertTime          :: !(Maybe Text)
@@ -274,6 +286,7 @@
     , _oId                  :: !(Maybe (Textual Word64))
     , _oOperationType       :: !(Maybe Text)
     , _oRegion              :: !(Maybe Text)
+    , _oDescription         :: !(Maybe Text)
     , _oTargetLink          :: !(Maybe Text)
     , _oClientOperationId   :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -322,13 +335,15 @@
 --
 -- * 'oRegion'
 --
+-- * 'oDescription'
+--
 -- * 'oTargetLink'
 --
 -- * 'oClientOperationId'
 operation
     :: Operation
 operation =
-    Operation
+    Operation'
     { _oTargetId = Nothing
     , _oStatus = Nothing
     , _oInsertTime = Nothing
@@ -349,45 +364,46 @@
     , _oId = Nothing
     , _oOperationType = Nothing
     , _oRegion = Nothing
+    , _oDescription = Nothing
     , _oTargetLink = Nothing
     , _oClientOperationId = Nothing
     }
 
--- | [Output Only] Unique target ID which identifies a particular incarnation
--- of the target.
+-- | [Output Only] The unique target ID, which identifies a specific
+-- incarnation of the target resource.
 oTargetId :: Lens' Operation (Maybe Word64)
 oTargetId
   = lens _oTargetId (\ s a -> s{_oTargetId = a}) .
       mapping _Coerce
 
--- | [Output Only] Status of the operation. Can be one of the following:
--- PENDING, RUNNING, or DONE.
+-- | [Output Only] The status of the operation, which can be one of the
+-- following: PENDING, RUNNING, or DONE.
 oStatus :: Lens' Operation (Maybe Text)
 oStatus = lens _oStatus (\ s a -> s{_oStatus = a})
 
--- | [Output Only] The time that this operation was requested. This is in
--- RFC3339 text format.
+-- | [Output Only] The time that this operation was requested. This value is
+-- in RFC3339 text format.
 oInsertTime :: Lens' Operation (Maybe Text)
 oInsertTime
   = lens _oInsertTime (\ s a -> s{_oInsertTime = a})
 
 -- | [Output Only] An optional progress indicator that ranges from 0 to 100.
 -- There is no requirement that this be linear or support any granularity
--- of operations. This should not be used to guess at when the operation
--- will be complete. This number should monotonically increase as the
--- operation progresses.
+-- of operations. This should not be used to guess when the operation will
+-- be complete. This number should monotonically increase as the operation
+-- progresses.
 oProgress :: Lens' Operation (Maybe Int32)
 oProgress
   = lens _oProgress (\ s a -> s{_oProgress = a}) .
       mapping _Coerce
 
 -- | [Output Only] The time that this operation was started by the server.
--- This is in RFC3339 text format.
+-- This value is in RFC3339 text format.
 oStartTime :: Lens' Operation (Maybe Text)
 oStartTime
   = lens _oStartTime (\ s a -> s{_oStartTime = a})
 
--- | [Output Only] Type of the resource. Always compute#Operation for
+-- | [Output Only] Type of the resource. Always compute#operation for
 -- Operation resources.
 oKind :: Lens' Operation Text
 oKind = lens _oKind (\ s a -> s{_oKind = a})
@@ -404,7 +420,8 @@
   = lens _oHTTPErrorMessage
       (\ s a -> s{_oHTTPErrorMessage = a})
 
--- | [Output Only] URL of the zone where the operation resides.
+-- | [Output Only] The URL of the zone where the operation resides. Only
+-- available when performing per-zone operations.
 oZone :: Lens' Operation (Maybe Text)
 oZone = lens _oZone (\ s a -> s{_oZone = a})
 
@@ -417,7 +434,8 @@
       . _Coerce
 
 -- | [Output Only] If the operation fails, this field contains the HTTP error
--- message that was returned, such as 404.
+-- status code that was returned. For example, a 404 means the resource was
+-- not found.
 oHTTPErrorStatusCode :: Lens' Operation (Maybe Int32)
 oHTTPErrorStatusCode
   = lens _oHTTPErrorStatusCode
@@ -451,35 +469,41 @@
   = lens _oCreationTimestamp
       (\ s a -> s{_oCreationTimestamp = a})
 
--- | [Output Only] The time that this operation was completed. This is in
--- RFC3339 text format.
+-- | [Output Only] The time that this operation was completed. This value is
+-- in RFC3339 text format.
 oEndTime :: Lens' Operation (Maybe Text)
 oEndTime = lens _oEndTime (\ s a -> s{_oEndTime = a})
 
--- | [Output Only] Unique identifier for the resource; defined by the server.
+-- | [Output Only] The unique identifier for the resource. This identifier is
+-- defined by the server.
 oId :: Lens' Operation (Maybe Word64)
 oId
   = lens _oId (\ s a -> s{_oId = a}) . mapping _Coerce
 
--- | [Output Only] Type of the operation, such as insert, update, and delete.
+-- | [Output Only] The type of operation, such as insert, update, or delete,
+-- and so on.
 oOperationType :: Lens' Operation (Maybe Text)
 oOperationType
   = lens _oOperationType
       (\ s a -> s{_oOperationType = a})
 
--- | [Output Only] URL of the region where the operation resides. Only
--- applicable for regional resources.
+-- | [Output Only] The URL of the region where the operation resides. Only
+-- available when performing regional operations.
 oRegion :: Lens' Operation (Maybe Text)
 oRegion = lens _oRegion (\ s a -> s{_oRegion = a})
 
--- | [Output Only] URL of the resource the operation is mutating.
+-- | [Output Only] A textual description of the operation, which is set when
+-- the operation is created.
+oDescription :: Lens' Operation (Maybe Text)
+oDescription
+  = lens _oDescription (\ s a -> s{_oDescription = a})
+
+-- | [Output Only] The URL of the resource that the operation modifies.
 oTargetLink :: Lens' Operation (Maybe Text)
 oTargetLink
   = lens _oTargetLink (\ s a -> s{_oTargetLink = a})
 
--- | [Output Only] An optional identifier specified by the client when the
--- mutation was initiated. Must be unique for all Operation resources in
--- the project.
+-- | [Output Only] Reserved for future use.
 oClientOperationId :: Lens' Operation (Maybe Text)
 oClientOperationId
   = lens _oClientOperationId
@@ -489,7 +513,7 @@
         parseJSON
           = withObject "Operation"
               (\ o ->
-                 Operation <$>
+                 Operation' <$>
                    (o .:? "targetId") <*> (o .:? "status") <*>
                      (o .:? "insertTime")
                      <*> (o .:? "progress")
@@ -509,11 +533,12 @@
                      <*> (o .:? "id")
                      <*> (o .:? "operationType")
                      <*> (o .:? "region")
+                     <*> (o .:? "description")
                      <*> (o .:? "targetLink")
                      <*> (o .:? "clientOperationId"))
 
 instance ToJSON Operation where
-        toJSON Operation{..}
+        toJSON Operation'{..}
           = object
               (catMaybes
                  [("targetId" .=) <$> _oTargetId,
@@ -534,6 +559,7 @@
                   ("endTime" .=) <$> _oEndTime, ("id" .=) <$> _oId,
                   ("operationType" .=) <$> _oOperationType,
                   ("region" .=) <$> _oRegion,
+                  ("description" .=) <$> _oDescription,
                   ("targetLink" .=) <$> _oTargetLink,
                   ("clientOperationId" .=) <$> _oClientOperationId])
 
@@ -541,7 +567,7 @@
 -- to build the next request if the request has been truncated.
 --
 -- /See:/ 'resourcesListResponse' smart constructor.
-data ResourcesListResponse = ResourcesListResponse
+data ResourcesListResponse = ResourcesListResponse'
     { _rlrNextPageToken :: !(Maybe Text)
     , _rlrResources     :: !(Maybe [Resource])
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -556,7 +582,7 @@
 resourcesListResponse
     :: ResourcesListResponse
 resourcesListResponse =
-    ResourcesListResponse
+    ResourcesListResponse'
     { _rlrNextPageToken = Nothing
     , _rlrResources = Nothing
     }
@@ -578,12 +604,12 @@
         parseJSON
           = withObject "ResourcesListResponse"
               (\ o ->
-                 ResourcesListResponse <$>
+                 ResourcesListResponse' <$>
                    (o .:? "nextPageToken") <*>
                      (o .:? "resources" .!= mempty))
 
 instance ToJSON ResourcesListResponse where
-        toJSON ResourcesListResponse{..}
+        toJSON ResourcesListResponse'{..}
           = object
               (catMaybes
                  [("nextPageToken" .=) <$> _rlrNextPageToken,
@@ -592,8 +618,9 @@
 -- |
 --
 -- /See:/ 'deploymentUpdate' smart constructor.
-newtype DeploymentUpdate = DeploymentUpdate
-    { _duManifest :: Maybe Text
+data DeploymentUpdate = DeploymentUpdate'
+    { _duManifest :: !(Maybe Text)
+    , _duLabels   :: !(Maybe [DeploymentUpdateLabelEntry])
     } deriving (Eq,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'DeploymentUpdate' with the minimum fields required to make a request.
@@ -601,11 +628,14 @@
 -- Use one of the following lenses to modify other fields as desired:
 --
 -- * 'duManifest'
+--
+-- * 'duLabels'
 deploymentUpdate
     :: DeploymentUpdate
 deploymentUpdate =
-    DeploymentUpdate
+    DeploymentUpdate'
     { _duManifest = Nothing
+    , _duLabels = Nothing
     }
 
 -- | [Output Only] URL of the manifest representing the update configuration
@@ -614,20 +644,36 @@
 duManifest
   = lens _duManifest (\ s a -> s{_duManifest = a})
 
+-- | [Output Only] Map of labels; provided by the client when the resource is
+-- created or updated. Specifically: Label keys must be between 1 and 63
+-- characters long and must conform to the following regular expression:
+-- [a-z]([-a-z0-9]*[a-z0-9])? Label values must be between 0 and 63
+-- characters long and must conform to the regular expression
+-- ([a-z]([-a-z0-9]*[a-z0-9])?)?
+duLabels :: Lens' DeploymentUpdate [DeploymentUpdateLabelEntry]
+duLabels
+  = lens _duLabels (\ s a -> s{_duLabels = a}) .
+      _Default
+      . _Coerce
+
 instance FromJSON DeploymentUpdate where
         parseJSON
           = withObject "DeploymentUpdate"
-              (\ o -> DeploymentUpdate <$> (o .:? "manifest"))
+              (\ o ->
+                 DeploymentUpdate' <$>
+                   (o .:? "manifest") <*> (o .:? "labels" .!= mempty))
 
 instance ToJSON DeploymentUpdate where
-        toJSON DeploymentUpdate{..}
+        toJSON DeploymentUpdate'{..}
           = object
-              (catMaybes [("manifest" .=) <$> _duManifest])
+              (catMaybes
+                 [("manifest" .=) <$> _duManifest,
+                  ("labels" .=) <$> _duLabels])
 
 -- |
 --
 -- /See:/ 'resourceUpdate' smart constructor.
-data ResourceUpdate = ResourceUpdate
+data ResourceUpdate = ResourceUpdate'
     { _ruState           :: !(Maybe Text)
     , _ruError           :: !(Maybe ResourceUpdateError)
     , _ruWarnings        :: !(Maybe [ResourceUpdateWarningsItem])
@@ -657,7 +703,7 @@
 resourceUpdate
     :: ResourceUpdate
 resourceUpdate =
-    ResourceUpdate
+    ResourceUpdate'
     { _ruState = Nothing
     , _ruError = Nothing
     , _ruWarnings = Nothing
@@ -711,7 +757,7 @@
         parseJSON
           = withObject "ResourceUpdate"
               (\ o ->
-                 ResourceUpdate <$>
+                 ResourceUpdate' <$>
                    (o .:? "state") <*> (o .:? "error") <*>
                      (o .:? "warnings" .!= mempty)
                      <*> (o .:? "intent")
@@ -720,7 +766,7 @@
                      <*> (o .:? "properties"))
 
 instance ToJSON ResourceUpdate where
-        toJSON ResourceUpdate{..}
+        toJSON ResourceUpdate'{..}
           = object
               (catMaybes
                  [("state" .=) <$> _ruState,
@@ -731,10 +777,51 @@
                   ("finalProperties" .=) <$> _ruFinalProperties,
                   ("properties" .=) <$> _ruProperties])
 
+--
+-- /See:/ 'deploymentLabelEntry' smart constructor.
+data DeploymentLabelEntry = DeploymentLabelEntry'
+    { _dleValue :: !(Maybe Text)
+    , _dleKey   :: !(Maybe Text)
+    } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'DeploymentLabelEntry' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'dleValue'
+--
+-- * 'dleKey'
+deploymentLabelEntry
+    :: DeploymentLabelEntry
+deploymentLabelEntry =
+    DeploymentLabelEntry'
+    { _dleValue = Nothing
+    , _dleKey = Nothing
+    }
+
+dleValue :: Lens' DeploymentLabelEntry (Maybe Text)
+dleValue = lens _dleValue (\ s a -> s{_dleValue = a})
+
+dleKey :: Lens' DeploymentLabelEntry (Maybe Text)
+dleKey = lens _dleKey (\ s a -> s{_dleKey = a})
+
+instance FromJSON DeploymentLabelEntry where
+        parseJSON
+          = withObject "DeploymentLabelEntry"
+              (\ o ->
+                 DeploymentLabelEntry' <$>
+                   (o .:? "value") <*> (o .:? "key"))
+
+instance ToJSON DeploymentLabelEntry where
+        toJSON DeploymentLabelEntry'{..}
+          = object
+              (catMaybes
+                 [("value" .=) <$> _dleValue, ("key" .=) <$> _dleKey])
+
 -- |
 --
 -- /See:/ 'manifest' smart constructor.
-data Manifest = Manifest
+data Manifest = Manifest'
     { _mInsertTime     :: !(Maybe Text)
     , _mLayout         :: !(Maybe Text)
     , _mConfig         :: !(Maybe ConfigFile)
@@ -767,7 +854,7 @@
 manifest
     :: Manifest
 manifest =
-    Manifest
+    Manifest'
     { _mInsertTime = Nothing
     , _mLayout = Nothing
     , _mConfig = Nothing
@@ -824,7 +911,7 @@
         parseJSON
           = withObject "Manifest"
               (\ o ->
-                 Manifest <$>
+                 Manifest' <$>
                    (o .:? "insertTime") <*> (o .:? "layout") <*>
                      (o .:? "config")
                      <*> (o .:? "expandedConfig")
@@ -834,7 +921,7 @@
                      <*> (o .:? "id"))
 
 instance ToJSON Manifest where
-        toJSON Manifest{..}
+        toJSON Manifest'{..}
           = object
               (catMaybes
                  [("insertTime" .=) <$> _mInsertTime,
@@ -847,7 +934,7 @@
 
 --
 -- /See:/ 'resourceUpdateWarningsItem' smart constructor.
-data ResourceUpdateWarningsItem = ResourceUpdateWarningsItem
+data ResourceUpdateWarningsItem = ResourceUpdateWarningsItem'
     { _ruwiData    :: !(Maybe [ResourceUpdateWarningsItemDataItem])
     , _ruwiCode    :: !(Maybe Text)
     , _ruwiMessage :: !(Maybe Text)
@@ -865,24 +952,27 @@
 resourceUpdateWarningsItem
     :: ResourceUpdateWarningsItem
 resourceUpdateWarningsItem =
-    ResourceUpdateWarningsItem
+    ResourceUpdateWarningsItem'
     { _ruwiData = Nothing
     , _ruwiCode = Nothing
     , _ruwiMessage = Nothing
     }
 
--- | [Output Only] Metadata for this warning in key: value format.
+-- | [Output Only] Metadata about this warning in key: value format. For
+-- example: \"data\": [ { \"key\": \"scope\", \"value\":
+-- \"zones\/us-east1-d\" }
 ruwiData :: Lens' ResourceUpdateWarningsItem [ResourceUpdateWarningsItemDataItem]
 ruwiData
   = lens _ruwiData (\ s a -> s{_ruwiData = a}) .
       _Default
       . _Coerce
 
--- | [Output Only] The warning type identifier for this warning.
+-- | [Output Only] A warning code, if applicable. For example, Compute Engine
+-- returns NO_RESULTS_ON_PAGE if there are no results in the response.
 ruwiCode :: Lens' ResourceUpdateWarningsItem (Maybe Text)
 ruwiCode = lens _ruwiCode (\ s a -> s{_ruwiCode = a})
 
--- | [Output Only] Optional human-readable details for this warning.
+-- | [Output Only] A human-readable description of the warning code.
 ruwiMessage :: Lens' ResourceUpdateWarningsItem (Maybe Text)
 ruwiMessage
   = lens _ruwiMessage (\ s a -> s{_ruwiMessage = a})
@@ -891,12 +981,12 @@
         parseJSON
           = withObject "ResourceUpdateWarningsItem"
               (\ o ->
-                 ResourceUpdateWarningsItem <$>
+                 ResourceUpdateWarningsItem' <$>
                    (o .:? "data" .!= mempty) <*> (o .:? "code") <*>
                      (o .:? "message"))
 
 instance ToJSON ResourceUpdateWarningsItem where
-        toJSON ResourceUpdateWarningsItem{..}
+        toJSON ResourceUpdateWarningsItem'{..}
           = object
               (catMaybes
                  [("data" .=) <$> _ruwiData,
@@ -906,8 +996,8 @@
 -- |
 --
 -- /See:/ 'deploymentsCancelPreviewRequest' smart constructor.
-newtype DeploymentsCancelPreviewRequest = DeploymentsCancelPreviewRequest
-    { _dcprFingerprint :: Maybe (Textual Word8)
+newtype DeploymentsCancelPreviewRequest = DeploymentsCancelPreviewRequest'
+    { _dcprFingerprint :: Maybe Base64
     } deriving (Eq,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'DeploymentsCancelPreviewRequest' with the minimum fields required to make a request.
@@ -918,7 +1008,7 @@
 deploymentsCancelPreviewRequest
     :: DeploymentsCancelPreviewRequest
 deploymentsCancelPreviewRequest =
-    DeploymentsCancelPreviewRequest
+    DeploymentsCancelPreviewRequest'
     { _dcprFingerprint = Nothing
     }
 
@@ -930,30 +1020,30 @@
 -- user attempts to cancel a preview, this would prevent one of the
 -- requests). The fingerprint is initially generated by Deployment Manager
 -- and changes after every request to modify a deployment. To get the
--- latest fingerprint value, perform a get() request to a deployment.
-dcprFingerprint :: Lens' DeploymentsCancelPreviewRequest (Maybe Word8)
+-- latest fingerprint value, perform a get() request on the deployment.
+dcprFingerprint :: Lens' DeploymentsCancelPreviewRequest (Maybe ByteString)
 dcprFingerprint
   = lens _dcprFingerprint
       (\ s a -> s{_dcprFingerprint = a})
-      . mapping _Coerce
+      . mapping _Base64
 
 instance FromJSON DeploymentsCancelPreviewRequest
          where
         parseJSON
           = withObject "DeploymentsCancelPreviewRequest"
               (\ o ->
-                 DeploymentsCancelPreviewRequest <$>
+                 DeploymentsCancelPreviewRequest' <$>
                    (o .:? "fingerprint"))
 
 instance ToJSON DeploymentsCancelPreviewRequest where
-        toJSON DeploymentsCancelPreviewRequest{..}
+        toJSON DeploymentsCancelPreviewRequest'{..}
           = object
               (catMaybes [("fingerprint" .=) <$> _dcprFingerprint])
 
 -- |
 --
 -- /See:/ 'resource' smart constructor.
-data Resource = Resource
+data Resource = Resource'
     { _rInsertTime      :: !(Maybe Text)
     , _rURL             :: !(Maybe Text)
     , _rWarnings        :: !(Maybe [ResourceWarningsItem])
@@ -995,7 +1085,7 @@
 resource
     :: Resource
 resource =
-    Resource
+    Resource'
     { _rInsertTime = Nothing
     , _rURL = Nothing
     , _rWarnings = Nothing
@@ -1075,7 +1165,7 @@
         parseJSON
           = withObject "Resource"
               (\ o ->
-                 Resource <$>
+                 Resource' <$>
                    (o .:? "insertTime") <*> (o .:? "url") <*>
                      (o .:? "warnings" .!= mempty)
                      <*> (o .:? "updateTime")
@@ -1088,7 +1178,7 @@
                      <*> (o .:? "properties"))
 
 instance ToJSON Resource where
-        toJSON Resource{..}
+        toJSON Resource'{..}
           = object
               (catMaybes
                  [("insertTime" .=) <$> _rInsertTime,
@@ -1102,8 +1192,51 @@
                   ("properties" .=) <$> _rProperties])
 
 --
+-- /See:/ 'deploymentUpdateLabelEntry' smart constructor.
+data DeploymentUpdateLabelEntry = DeploymentUpdateLabelEntry'
+    { _duleValue :: !(Maybe Text)
+    , _duleKey   :: !(Maybe Text)
+    } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'DeploymentUpdateLabelEntry' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'duleValue'
+--
+-- * 'duleKey'
+deploymentUpdateLabelEntry
+    :: DeploymentUpdateLabelEntry
+deploymentUpdateLabelEntry =
+    DeploymentUpdateLabelEntry'
+    { _duleValue = Nothing
+    , _duleKey = Nothing
+    }
+
+duleValue :: Lens' DeploymentUpdateLabelEntry (Maybe Text)
+duleValue
+  = lens _duleValue (\ s a -> s{_duleValue = a})
+
+duleKey :: Lens' DeploymentUpdateLabelEntry (Maybe Text)
+duleKey = lens _duleKey (\ s a -> s{_duleKey = a})
+
+instance FromJSON DeploymentUpdateLabelEntry where
+        parseJSON
+          = withObject "DeploymentUpdateLabelEntry"
+              (\ o ->
+                 DeploymentUpdateLabelEntry' <$>
+                   (o .:? "value") <*> (o .:? "key"))
+
+instance ToJSON DeploymentUpdateLabelEntry where
+        toJSON DeploymentUpdateLabelEntry'{..}
+          = object
+              (catMaybes
+                 [("value" .=) <$> _duleValue,
+                  ("key" .=) <$> _duleKey])
+
+--
 -- /See:/ 'resourceUpdateErrorErrorsItem' smart constructor.
-data ResourceUpdateErrorErrorsItem = ResourceUpdateErrorErrorsItem
+data ResourceUpdateErrorErrorsItem = ResourceUpdateErrorErrorsItem'
     { _rueeiLocation :: !(Maybe Text)
     , _rueeiCode     :: !(Maybe Text)
     , _rueeiMessage  :: !(Maybe Text)
@@ -1121,13 +1254,13 @@
 resourceUpdateErrorErrorsItem
     :: ResourceUpdateErrorErrorsItem
 resourceUpdateErrorErrorsItem =
-    ResourceUpdateErrorErrorsItem
+    ResourceUpdateErrorErrorsItem'
     { _rueeiLocation = Nothing
     , _rueeiCode = Nothing
     , _rueeiMessage = Nothing
     }
 
--- | [Output Only] Indicates the field in the request which caused the error.
+-- | [Output Only] Indicates the field in the request that caused the error.
 -- This property is optional.
 rueeiLocation :: Lens' ResourceUpdateErrorErrorsItem (Maybe Text)
 rueeiLocation
@@ -1148,12 +1281,12 @@
         parseJSON
           = withObject "ResourceUpdateErrorErrorsItem"
               (\ o ->
-                 ResourceUpdateErrorErrorsItem <$>
+                 ResourceUpdateErrorErrorsItem' <$>
                    (o .:? "location") <*> (o .:? "code") <*>
                      (o .:? "message"))
 
 instance ToJSON ResourceUpdateErrorErrorsItem where
-        toJSON ResourceUpdateErrorErrorsItem{..}
+        toJSON ResourceUpdateErrorErrorsItem'{..}
           = object
               (catMaybes
                  [("location" .=) <$> _rueeiLocation,
@@ -1164,7 +1297,7 @@
 -- to build the next request if the request has been truncated.
 --
 -- /See:/ 'manifestsListResponse' smart constructor.
-data ManifestsListResponse = ManifestsListResponse
+data ManifestsListResponse = ManifestsListResponse'
     { _mlrNextPageToken :: !(Maybe Text)
     , _mlrManifests     :: !(Maybe [Manifest])
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1179,7 +1312,7 @@
 manifestsListResponse
     :: ManifestsListResponse
 manifestsListResponse =
-    ManifestsListResponse
+    ManifestsListResponse'
     { _mlrNextPageToken = Nothing
     , _mlrManifests = Nothing
     }
@@ -1201,12 +1334,12 @@
         parseJSON
           = withObject "ManifestsListResponse"
               (\ o ->
-                 ManifestsListResponse <$>
+                 ManifestsListResponse' <$>
                    (o .:? "nextPageToken") <*>
                      (o .:? "manifests" .!= mempty))
 
 instance ToJSON ManifestsListResponse where
-        toJSON ManifestsListResponse{..}
+        toJSON ManifestsListResponse'{..}
           = object
               (catMaybes
                  [("nextPageToken" .=) <$> _mlrNextPageToken,
@@ -1216,7 +1349,7 @@
 -- operation, this field will be populated.
 --
 -- /See:/ 'operationError' smart constructor.
-newtype OperationError = OperationError
+newtype OperationError = OperationError'
     { _oeErrors :: Maybe [OperationErrorErrorsItem]
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -1228,7 +1361,7 @@
 operationError
     :: OperationError
 operationError =
-    OperationError
+    OperationError'
     { _oeErrors = Nothing
     }
 
@@ -1244,16 +1377,16 @@
         parseJSON
           = withObject "OperationError"
               (\ o ->
-                 OperationError <$> (o .:? "errors" .!= mempty))
+                 OperationError' <$> (o .:? "errors" .!= mempty))
 
 instance ToJSON OperationError where
-        toJSON OperationError{..}
+        toJSON OperationError'{..}
           = object (catMaybes [("errors" .=) <$> _oeErrors])
 
 -- | A resource type supported by Deployment Manager.
 --
 -- /See:/ 'type'' smart constructor.
-data Type = Type
+data Type = Type'
     { _tInsertTime :: !(Maybe Text)
     , _tSelfLink   :: !(Maybe Text)
     , _tName       :: !(Maybe Text)
@@ -1274,7 +1407,7 @@
 type'
     :: Type
 type' =
-    Type
+    Type'
     { _tInsertTime = Nothing
     , _tSelfLink = Nothing
     , _tName = Nothing
@@ -1305,13 +1438,13 @@
         parseJSON
           = withObject "Type"
               (\ o ->
-                 Type <$>
+                 Type' <$>
                    (o .:? "insertTime") <*> (o .:? "selfLink") <*>
                      (o .:? "name")
                      <*> (o .:? "id"))
 
 instance ToJSON Type where
-        toJSON Type{..}
+        toJSON Type'{..}
           = object
               (catMaybes
                  [("insertTime" .=) <$> _tInsertTime,
@@ -1321,7 +1454,7 @@
 -- |
 --
 -- /See:/ 'importFile' smart constructor.
-data ImportFile = ImportFile
+data ImportFile = ImportFile'
     { _ifContent :: !(Maybe Text)
     , _ifName    :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1336,7 +1469,7 @@
 importFile
     :: ImportFile
 importFile =
-    ImportFile
+    ImportFile'
     { _ifContent = Nothing
     , _ifName = Nothing
     }
@@ -1354,10 +1487,10 @@
         parseJSON
           = withObject "ImportFile"
               (\ o ->
-                 ImportFile <$> (o .:? "content") <*> (o .:? "name"))
+                 ImportFile' <$> (o .:? "content") <*> (o .:? "name"))
 
 instance ToJSON ImportFile where
-        toJSON ImportFile{..}
+        toJSON ImportFile'{..}
           = object
               (catMaybes
                  [("content" .=) <$> _ifContent,
@@ -1365,7 +1498,7 @@
 
 --
 -- /See:/ 'operationErrorErrorsItem' smart constructor.
-data OperationErrorErrorsItem = OperationErrorErrorsItem
+data OperationErrorErrorsItem = OperationErrorErrorsItem'
     { _oeeiLocation :: !(Maybe Text)
     , _oeeiCode     :: !(Maybe Text)
     , _oeeiMessage  :: !(Maybe Text)
@@ -1383,13 +1516,13 @@
 operationErrorErrorsItem
     :: OperationErrorErrorsItem
 operationErrorErrorsItem =
-    OperationErrorErrorsItem
+    OperationErrorErrorsItem'
     { _oeeiLocation = Nothing
     , _oeeiCode = Nothing
     , _oeeiMessage = Nothing
     }
 
--- | [Output Only] Indicates the field in the request which caused the error.
+-- | [Output Only] Indicates the field in the request that caused the error.
 -- This property is optional.
 oeeiLocation :: Lens' OperationErrorErrorsItem (Maybe Text)
 oeeiLocation
@@ -1408,12 +1541,12 @@
         parseJSON
           = withObject "OperationErrorErrorsItem"
               (\ o ->
-                 OperationErrorErrorsItem <$>
+                 OperationErrorErrorsItem' <$>
                    (o .:? "location") <*> (o .:? "code") <*>
                      (o .:? "message"))
 
 instance ToJSON OperationErrorErrorsItem where
-        toJSON OperationErrorErrorsItem{..}
+        toJSON OperationErrorErrorsItem'{..}
           = object
               (catMaybes
                  [("location" .=) <$> _oeeiLocation,
@@ -1423,8 +1556,8 @@
 -- |
 --
 -- /See:/ 'deploymentsStopRequest' smart constructor.
-newtype DeploymentsStopRequest = DeploymentsStopRequest
-    { _dsrFingerprint :: Maybe (Textual Word8)
+newtype DeploymentsStopRequest = DeploymentsStopRequest'
+    { _dsrFingerprint :: Maybe Base64
     } deriving (Eq,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'DeploymentsStopRequest' with the minimum fields required to make a request.
@@ -1435,7 +1568,7 @@
 deploymentsStopRequest
     :: DeploymentsStopRequest
 deploymentsStopRequest =
-    DeploymentsStopRequest
+    DeploymentsStopRequest'
     { _dsrFingerprint = Nothing
     }
 
@@ -1447,27 +1580,27 @@
 -- ongoing update request, this would prevent a collision). The fingerprint
 -- is initially generated by Deployment Manager and changes after every
 -- request to modify a deployment. To get the latest fingerprint value,
--- perform a get() request to a deployment.
-dsrFingerprint :: Lens' DeploymentsStopRequest (Maybe Word8)
+-- perform a get() request on the deployment.
+dsrFingerprint :: Lens' DeploymentsStopRequest (Maybe ByteString)
 dsrFingerprint
   = lens _dsrFingerprint
       (\ s a -> s{_dsrFingerprint = a})
-      . mapping _Coerce
+      . mapping _Base64
 
 instance FromJSON DeploymentsStopRequest where
         parseJSON
           = withObject "DeploymentsStopRequest"
               (\ o ->
-                 DeploymentsStopRequest <$> (o .:? "fingerprint"))
+                 DeploymentsStopRequest' <$> (o .:? "fingerprint"))
 
 instance ToJSON DeploymentsStopRequest where
-        toJSON DeploymentsStopRequest{..}
+        toJSON DeploymentsStopRequest'{..}
           = object
               (catMaybes [("fingerprint" .=) <$> _dsrFingerprint])
 
 --
 -- /See:/ 'resourceWarningsItemDataItem' smart constructor.
-data ResourceWarningsItemDataItem = ResourceWarningsItemDataItem
+data ResourceWarningsItemDataItem = ResourceWarningsItemDataItem'
     { _rwidiValue :: !(Maybe Text)
     , _rwidiKey   :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1482,7 +1615,7 @@
 resourceWarningsItemDataItem
     :: ResourceWarningsItemDataItem
 resourceWarningsItemDataItem =
-    ResourceWarningsItemDataItem
+    ResourceWarningsItemDataItem'
     { _rwidiValue = Nothing
     , _rwidiKey = Nothing
     }
@@ -1492,7 +1625,13 @@
 rwidiValue
   = lens _rwidiValue (\ s a -> s{_rwidiValue = a})
 
--- | [Output Only] A key for the warning data.
+-- | [Output Only] A key that provides more detail on the warning being
+-- returned. For example, for warnings where there are no results in a list
+-- request for a particular zone, this key might be scope and the key value
+-- might be the zone name. Other examples might be a key indicating a
+-- deprecated resource and a suggested replacement, or a warning about
+-- invalid network settings (for example, if an instance attempts to
+-- perform IP forwarding but is not enabled for IP forwarding).
 rwidiKey :: Lens' ResourceWarningsItemDataItem (Maybe Text)
 rwidiKey = lens _rwidiKey (\ s a -> s{_rwidiKey = a})
 
@@ -1500,11 +1639,11 @@
         parseJSON
           = withObject "ResourceWarningsItemDataItem"
               (\ o ->
-                 ResourceWarningsItemDataItem <$>
+                 ResourceWarningsItemDataItem' <$>
                    (o .:? "value") <*> (o .:? "key"))
 
 instance ToJSON ResourceWarningsItemDataItem where
-        toJSON ResourceWarningsItemDataItem{..}
+        toJSON ResourceWarningsItemDataItem'{..}
           = object
               (catMaybes
                  [("value" .=) <$> _rwidiValue,
@@ -1514,7 +1653,7 @@
 -- this field will be populated.
 --
 -- /See:/ 'resourceUpdateError' smart constructor.
-newtype ResourceUpdateError = ResourceUpdateError
+newtype ResourceUpdateError = ResourceUpdateError'
     { _rueErrors :: Maybe [ResourceUpdateErrorErrorsItem]
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -1526,7 +1665,7 @@
 resourceUpdateError
     :: ResourceUpdateError
 resourceUpdateError =
-    ResourceUpdateError
+    ResourceUpdateError'
     { _rueErrors = Nothing
     }
 
@@ -1542,17 +1681,17 @@
         parseJSON
           = withObject "ResourceUpdateError"
               (\ o ->
-                 ResourceUpdateError <$> (o .:? "errors" .!= mempty))
+                 ResourceUpdateError' <$> (o .:? "errors" .!= mempty))
 
 instance ToJSON ResourceUpdateError where
-        toJSON ResourceUpdateError{..}
+        toJSON ResourceUpdateError'{..}
           = object (catMaybes [("errors" .=) <$> _rueErrors])
 
 -- | A response containing a partial list of deployments and a page token
 -- used to build the next request if the request has been truncated.
 --
 -- /See:/ 'deploymentsListResponse' smart constructor.
-data DeploymentsListResponse = DeploymentsListResponse
+data DeploymentsListResponse = DeploymentsListResponse'
     { _dlrNextPageToken :: !(Maybe Text)
     , _dlrDeployments   :: !(Maybe [Deployment])
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1567,7 +1706,7 @@
 deploymentsListResponse
     :: DeploymentsListResponse
 deploymentsListResponse =
-    DeploymentsListResponse
+    DeploymentsListResponse'
     { _dlrNextPageToken = Nothing
     , _dlrDeployments = Nothing
     }
@@ -1590,12 +1729,12 @@
         parseJSON
           = withObject "DeploymentsListResponse"
               (\ o ->
-                 DeploymentsListResponse <$>
+                 DeploymentsListResponse' <$>
                    (o .:? "nextPageToken") <*>
                      (o .:? "deployments" .!= mempty))
 
 instance ToJSON DeploymentsListResponse where
-        toJSON DeploymentsListResponse{..}
+        toJSON DeploymentsListResponse'{..}
           = object
               (catMaybes
                  [("nextPageToken" .=) <$> _dlrNextPageToken,
@@ -1603,7 +1742,7 @@
 
 --
 -- /See:/ 'resourceWarningsItem' smart constructor.
-data ResourceWarningsItem = ResourceWarningsItem
+data ResourceWarningsItem = ResourceWarningsItem'
     { _rwiData    :: !(Maybe [ResourceWarningsItemDataItem])
     , _rwiCode    :: !(Maybe Text)
     , _rwiMessage :: !(Maybe Text)
@@ -1621,23 +1760,26 @@
 resourceWarningsItem
     :: ResourceWarningsItem
 resourceWarningsItem =
-    ResourceWarningsItem
+    ResourceWarningsItem'
     { _rwiData = Nothing
     , _rwiCode = Nothing
     , _rwiMessage = Nothing
     }
 
--- | [Output Only] Metadata for this warning in key: value format.
+-- | [Output Only] Metadata about this warning in key: value format. For
+-- example: \"data\": [ { \"key\": \"scope\", \"value\":
+-- \"zones\/us-east1-d\" }
 rwiData :: Lens' ResourceWarningsItem [ResourceWarningsItemDataItem]
 rwiData
   = lens _rwiData (\ s a -> s{_rwiData = a}) . _Default
       . _Coerce
 
--- | [Output Only] The warning type identifier for this warning.
+-- | [Output Only] A warning code, if applicable. For example, Compute Engine
+-- returns NO_RESULTS_ON_PAGE if there are no results in the response.
 rwiCode :: Lens' ResourceWarningsItem (Maybe Text)
 rwiCode = lens _rwiCode (\ s a -> s{_rwiCode = a})
 
--- | [Output Only] Optional human-readable details for this warning.
+-- | [Output Only] A human-readable description of the warning code.
 rwiMessage :: Lens' ResourceWarningsItem (Maybe Text)
 rwiMessage
   = lens _rwiMessage (\ s a -> s{_rwiMessage = a})
@@ -1646,12 +1788,12 @@
         parseJSON
           = withObject "ResourceWarningsItem"
               (\ o ->
-                 ResourceWarningsItem <$>
+                 ResourceWarningsItem' <$>
                    (o .:? "data" .!= mempty) <*> (o .:? "code") <*>
                      (o .:? "message"))
 
 instance ToJSON ResourceWarningsItem where
-        toJSON ResourceWarningsItem{..}
+        toJSON ResourceWarningsItem'{..}
           = object
               (catMaybes
                  [("data" .=) <$> _rwiData, ("code" .=) <$> _rwiCode,
@@ -1660,7 +1802,7 @@
 -- |
 --
 -- /See:/ 'targetConfiguration' smart constructor.
-data TargetConfiguration = TargetConfiguration
+data TargetConfiguration = TargetConfiguration'
     { _tcConfig  :: !(Maybe ConfigFile)
     , _tcImports :: !(Maybe [ImportFile])
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1675,7 +1817,7 @@
 targetConfiguration
     :: TargetConfiguration
 targetConfiguration =
-    TargetConfiguration
+    TargetConfiguration'
     { _tcConfig = Nothing
     , _tcImports = Nothing
     }
@@ -1697,11 +1839,11 @@
         parseJSON
           = withObject "TargetConfiguration"
               (\ o ->
-                 TargetConfiguration <$>
+                 TargetConfiguration' <$>
                    (o .:? "config") <*> (o .:? "imports" .!= mempty))
 
 instance ToJSON TargetConfiguration where
-        toJSON TargetConfiguration{..}
+        toJSON TargetConfiguration'{..}
           = object
               (catMaybes
                  [("config" .=) <$> _tcConfig,
@@ -1709,7 +1851,7 @@
 
 --
 -- /See:/ 'operationWarningsItem' smart constructor.
-data OperationWarningsItem = OperationWarningsItem
+data OperationWarningsItem = OperationWarningsItem'
     { _owiData    :: !(Maybe [OperationWarningsItemDataItem])
     , _owiCode    :: !(Maybe Text)
     , _owiMessage :: !(Maybe Text)
@@ -1727,23 +1869,26 @@
 operationWarningsItem
     :: OperationWarningsItem
 operationWarningsItem =
-    OperationWarningsItem
+    OperationWarningsItem'
     { _owiData = Nothing
     , _owiCode = Nothing
     , _owiMessage = Nothing
     }
 
--- | [Output Only] Metadata for this warning in key: value format.
+-- | [Output Only] Metadata about this warning in key: value format. For
+-- example: \"data\": [ { \"key\": \"scope\", \"value\":
+-- \"zones\/us-east1-d\" }
 owiData :: Lens' OperationWarningsItem [OperationWarningsItemDataItem]
 owiData
   = lens _owiData (\ s a -> s{_owiData = a}) . _Default
       . _Coerce
 
--- | [Output Only] The warning type identifier for this warning.
+-- | [Output Only] A warning code, if applicable. For example, Compute Engine
+-- returns NO_RESULTS_ON_PAGE if there are no results in the response.
 owiCode :: Lens' OperationWarningsItem (Maybe Text)
 owiCode = lens _owiCode (\ s a -> s{_owiCode = a})
 
--- | [Output Only] Optional human-readable details for this warning.
+-- | [Output Only] A human-readable description of the warning code.
 owiMessage :: Lens' OperationWarningsItem (Maybe Text)
 owiMessage
   = lens _owiMessage (\ s a -> s{_owiMessage = a})
@@ -1752,12 +1897,12 @@
         parseJSON
           = withObject "OperationWarningsItem"
               (\ o ->
-                 OperationWarningsItem <$>
+                 OperationWarningsItem' <$>
                    (o .:? "data" .!= mempty) <*> (o .:? "code") <*>
                      (o .:? "message"))
 
 instance ToJSON OperationWarningsItem where
-        toJSON OperationWarningsItem{..}
+        toJSON OperationWarningsItem'{..}
           = object
               (catMaybes
                  [("data" .=) <$> _owiData, ("code" .=) <$> _owiCode,
@@ -1766,13 +1911,15 @@
 -- |
 --
 -- /See:/ 'deployment' smart constructor.
-data Deployment = Deployment
+data Deployment = Deployment'
     { _dInsertTime  :: !(Maybe Text)
     , _dOperation   :: !(Maybe Operation)
-    , _dFingerprint :: !(Maybe (Textual Word8))
+    , _dFingerprint :: !(Maybe Base64)
+    , _dSelfLink    :: !(Maybe Text)
     , _dName        :: !(Maybe Text)
     , _dManifest    :: !(Maybe Text)
     , _dId          :: !(Maybe (Textual Word64))
+    , _dLabels      :: !(Maybe [DeploymentLabelEntry])
     , _dDescription :: !(Maybe Text)
     , _dUpdate      :: !(Maybe DeploymentUpdate)
     , _dTarget      :: !(Maybe TargetConfiguration)
@@ -1788,12 +1935,16 @@
 --
 -- * 'dFingerprint'
 --
+-- * 'dSelfLink'
+--
 -- * 'dName'
 --
 -- * 'dManifest'
 --
 -- * 'dId'
 --
+-- * 'dLabels'
+--
 -- * 'dDescription'
 --
 -- * 'dUpdate'
@@ -1802,13 +1953,15 @@
 deployment
     :: Deployment
 deployment =
-    Deployment
+    Deployment'
     { _dInsertTime = Nothing
     , _dOperation = Nothing
     , _dFingerprint = Nothing
+    , _dSelfLink = Nothing
     , _dName = Nothing
     , _dManifest = Nothing
     , _dId = Nothing
+    , _dLabels = Nothing
     , _dDescription = Nothing
     , _dUpdate = Nothing
     , _dTarget = Nothing
@@ -1834,11 +1987,16 @@
 -- fingerprint is initially generated by Deployment Manager and changes
 -- after every request to modify data. To get the latest fingerprint value,
 -- perform a get() request to a deployment.
-dFingerprint :: Lens' Deployment (Maybe Word8)
+dFingerprint :: Lens' Deployment (Maybe ByteString)
 dFingerprint
   = lens _dFingerprint (\ s a -> s{_dFingerprint = a})
-      . mapping _Coerce
+      . mapping _Base64
 
+-- | [Output Only] Self link for the deployment.
+dSelfLink :: Lens' Deployment (Maybe Text)
+dSelfLink
+  = lens _dSelfLink (\ s a -> s{_dSelfLink = a})
+
 -- | Name of the resource; provided by the client when the resource is
 -- created. The name must be 1-63 characters long, and comply with RFC1035.
 -- Specifically, the name must be 1-63 characters long and match the
@@ -1860,6 +2018,17 @@
 dId
   = lens _dId (\ s a -> s{_dId = a}) . mapping _Coerce
 
+-- | Map of labels; provided by the client when the resource is created or
+-- updated. Specifically: Label keys must be between 1 and 63 characters
+-- long and must conform to the following regular expression:
+-- [a-z]([-a-z0-9]*[a-z0-9])? Label values must be between 0 and 63
+-- characters long and must conform to the regular expression
+-- ([a-z]([-a-z0-9]*[a-z0-9])?)?
+dLabels :: Lens' Deployment [DeploymentLabelEntry]
+dLabels
+  = lens _dLabels (\ s a -> s{_dLabels = a}) . _Default
+      . _Coerce
+
 -- | An optional user-provided description of the deployment.
 dDescription :: Lens' Deployment (Maybe Text)
 dDescription
@@ -1879,25 +2048,29 @@
         parseJSON
           = withObject "Deployment"
               (\ o ->
-                 Deployment <$>
+                 Deployment' <$>
                    (o .:? "insertTime") <*> (o .:? "operation") <*>
                      (o .:? "fingerprint")
+                     <*> (o .:? "selfLink")
                      <*> (o .:? "name")
                      <*> (o .:? "manifest")
                      <*> (o .:? "id")
+                     <*> (o .:? "labels" .!= mempty)
                      <*> (o .:? "description")
                      <*> (o .:? "update")
                      <*> (o .:? "target"))
 
 instance ToJSON Deployment where
-        toJSON Deployment{..}
+        toJSON Deployment'{..}
           = object
               (catMaybes
                  [("insertTime" .=) <$> _dInsertTime,
                   ("operation" .=) <$> _dOperation,
                   ("fingerprint" .=) <$> _dFingerprint,
+                  ("selfLink" .=) <$> _dSelfLink,
                   ("name" .=) <$> _dName,
                   ("manifest" .=) <$> _dManifest, ("id" .=) <$> _dId,
+                  ("labels" .=) <$> _dLabels,
                   ("description" .=) <$> _dDescription,
                   ("update" .=) <$> _dUpdate,
                   ("target" .=) <$> _dTarget])
diff --git a/gen/Network/Google/DeploymentManager/Types/Sum.hs b/gen/Network/Google/DeploymentManager/Types/Sum.hs
--- a/gen/Network/Google/DeploymentManager/Types/Sum.hs
+++ b/gen/Network/Google/DeploymentManager/Types/Sum.hs
@@ -8,7 +8,7 @@
 
 -- |
 -- Module      : Network.Google.DeploymentManager.Types.Sum
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -24,18 +24,18 @@
       -- ^ @ACQUIRE@
     | CreateOrAcquire
       -- ^ @CREATE_OR_ACQUIRE@
-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
 
 instance Hashable DeploymentsUpdateCreatePolicy
 
-instance FromText DeploymentsUpdateCreatePolicy where
-    fromText = \case
-        "ACQUIRE" -> Just Acquire
-        "CREATE_OR_ACQUIRE" -> Just CreateOrAcquire
-        _ -> Nothing
+instance FromHttpApiData DeploymentsUpdateCreatePolicy where
+    parseQueryParam = \case
+        "ACQUIRE" -> Right Acquire
+        "CREATE_OR_ACQUIRE" -> Right CreateOrAcquire
+        x -> Left ("Unable to parse DeploymentsUpdateCreatePolicy from: " <> x)
 
-instance ToText DeploymentsUpdateCreatePolicy where
-    toText = \case
+instance ToHttpApiData DeploymentsUpdateCreatePolicy where
+    toQueryParam = \case
         Acquire -> "ACQUIRE"
         CreateOrAcquire -> "CREATE_OR_ACQUIRE"
 
@@ -51,18 +51,18 @@
       -- ^ @ABANDON@
     | Delete'
       -- ^ @DELETE@
-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
 
 instance Hashable DeploymentsUpdateDeletePolicy
 
-instance FromText DeploymentsUpdateDeletePolicy where
-    fromText = \case
-        "ABANDON" -> Just Abandon
-        "DELETE" -> Just Delete'
-        _ -> Nothing
+instance FromHttpApiData DeploymentsUpdateDeletePolicy where
+    parseQueryParam = \case
+        "ABANDON" -> Right Abandon
+        "DELETE" -> Right Delete'
+        x -> Left ("Unable to parse DeploymentsUpdateDeletePolicy from: " <> x)
 
-instance ToText DeploymentsUpdateDeletePolicy where
-    toText = \case
+instance ToHttpApiData DeploymentsUpdateDeletePolicy where
+    toQueryParam = \case
         Abandon -> "ABANDON"
         Delete' -> "DELETE"
 
@@ -78,18 +78,18 @@
       -- ^ @ABANDON@
     | DPDPDelete'
       -- ^ @DELETE@
-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
 
 instance Hashable DeploymentsPatchDeletePolicy
 
-instance FromText DeploymentsPatchDeletePolicy where
-    fromText = \case
-        "ABANDON" -> Just DPDPAbandon
-        "DELETE" -> Just DPDPDelete'
-        _ -> Nothing
+instance FromHttpApiData DeploymentsPatchDeletePolicy where
+    parseQueryParam = \case
+        "ABANDON" -> Right DPDPAbandon
+        "DELETE" -> Right DPDPDelete'
+        x -> Left ("Unable to parse DeploymentsPatchDeletePolicy from: " <> x)
 
-instance ToText DeploymentsPatchDeletePolicy where
-    toText = \case
+instance ToHttpApiData DeploymentsPatchDeletePolicy where
+    toQueryParam = \case
         DPDPAbandon -> "ABANDON"
         DPDPDelete' -> "DELETE"
 
@@ -105,18 +105,18 @@
       -- ^ @ACQUIRE@
     | DPCPCreateOrAcquire
       -- ^ @CREATE_OR_ACQUIRE@
-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
 
 instance Hashable DeploymentsPatchCreatePolicy
 
-instance FromText DeploymentsPatchCreatePolicy where
-    fromText = \case
-        "ACQUIRE" -> Just DPCPAcquire
-        "CREATE_OR_ACQUIRE" -> Just DPCPCreateOrAcquire
-        _ -> Nothing
+instance FromHttpApiData DeploymentsPatchCreatePolicy where
+    parseQueryParam = \case
+        "ACQUIRE" -> Right DPCPAcquire
+        "CREATE_OR_ACQUIRE" -> Right DPCPCreateOrAcquire
+        x -> Left ("Unable to parse DeploymentsPatchCreatePolicy from: " <> x)
 
-instance ToText DeploymentsPatchCreatePolicy where
-    toText = \case
+instance ToHttpApiData DeploymentsPatchCreatePolicy where
+    toQueryParam = \case
         DPCPAcquire -> "ACQUIRE"
         DPCPCreateOrAcquire -> "CREATE_OR_ACQUIRE"
 
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/CancelPreview.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/CancelPreview.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/CancelPreview.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/CancelPreview.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.CancelPreview
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -61,7 +61,7 @@
 -- deployment.
 --
 -- /See:/ 'deploymentsCancelPreview' smart constructor.
-data DeploymentsCancelPreview = DeploymentsCancelPreview
+data DeploymentsCancelPreview = DeploymentsCancelPreview'
     { _dcpProject    :: !Text
     , _dcpPayload    :: !DeploymentsCancelPreviewRequest
     , _dcpDeployment :: !Text
@@ -82,7 +82,7 @@
     -> Text -- ^ 'dcpDeployment'
     -> DeploymentsCancelPreview
 deploymentsCancelPreview pDcpProject_ pDcpPayload_ pDcpDeployment_ =
-    DeploymentsCancelPreview
+    DeploymentsCancelPreview'
     { _dcpProject = pDcpProject_
     , _dcpPayload = pDcpPayload_
     , _dcpDeployment = pDcpDeployment_
@@ -106,7 +106,10 @@
 
 instance GoogleRequest DeploymentsCancelPreview where
         type Rs DeploymentsCancelPreview = Operation
-        requestClient DeploymentsCancelPreview{..}
+        type Scopes DeploymentsCancelPreview =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/ndev.cloudman"]
+        requestClient DeploymentsCancelPreview'{..}
           = go _dcpProject _dcpDeployment (Just AltJSON)
               _dcpPayload
               deploymentManagerService
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.Delete
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -55,7 +55,7 @@
 -- | Deletes a deployment and all of the resources in the deployment.
 --
 -- /See:/ 'deploymentsDelete' smart constructor.
-data DeploymentsDelete = DeploymentsDelete
+data DeploymentsDelete = DeploymentsDelete'
     { _ddProject    :: !Text
     , _ddDeployment :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -72,7 +72,7 @@
     -> Text -- ^ 'ddDeployment'
     -> DeploymentsDelete
 deploymentsDelete pDdProject_ pDdDeployment_ =
-    DeploymentsDelete
+    DeploymentsDelete'
     { _ddProject = pDdProject_
     , _ddDeployment = pDdDeployment_
     }
@@ -89,7 +89,10 @@
 
 instance GoogleRequest DeploymentsDelete where
         type Rs DeploymentsDelete = Operation
-        requestClient DeploymentsDelete{..}
+        type Scopes DeploymentsDelete =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/ndev.cloudman"]
+        requestClient DeploymentsDelete'{..}
           = go _ddProject _ddDeployment (Just AltJSON)
               deploymentManagerService
           where go
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.Get
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -55,7 +55,7 @@
 -- | Gets information about a specific deployment.
 --
 -- /See:/ 'deploymentsGet' smart constructor.
-data DeploymentsGet = DeploymentsGet
+data DeploymentsGet = DeploymentsGet'
     { _dgProject    :: !Text
     , _dgDeployment :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -72,7 +72,7 @@
     -> Text -- ^ 'dgDeployment'
     -> DeploymentsGet
 deploymentsGet pDgProject_ pDgDeployment_ =
-    DeploymentsGet
+    DeploymentsGet'
     { _dgProject = pDgProject_
     , _dgDeployment = pDgDeployment_
     }
@@ -89,7 +89,12 @@
 
 instance GoogleRequest DeploymentsGet where
         type Rs DeploymentsGet = Deployment
-        requestClient DeploymentsGet{..}
+        type Scopes DeploymentsGet =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient DeploymentsGet'{..}
           = go _dgProject _dgDeployment (Just AltJSON)
               deploymentManagerService
           where go
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.Insert
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -59,7 +59,7 @@
 -- deployment manifest.
 --
 -- /See:/ 'deploymentsInsert' smart constructor.
-data DeploymentsInsert = DeploymentsInsert
+data DeploymentsInsert = DeploymentsInsert'
     { _diProject :: !Text
     , _diPayload :: !Deployment
     , _diPreview :: !(Maybe Bool)
@@ -79,7 +79,7 @@
     -> Deployment -- ^ 'diPayload'
     -> DeploymentsInsert
 deploymentsInsert pDiProject_ pDiPayload_ =
-    DeploymentsInsert
+    DeploymentsInsert'
     { _diProject = pDiProject_
     , _diPayload = pDiPayload_
     , _diPreview = Nothing
@@ -109,7 +109,10 @@
 
 instance GoogleRequest DeploymentsInsert where
         type Rs DeploymentsInsert = Operation
-        requestClient DeploymentsInsert{..}
+        type Scopes DeploymentsInsert =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/ndev.cloudman"]
+        requestClient DeploymentsInsert'{..}
           = go _diProject _diPreview (Just AltJSON) _diPayload
               deploymentManagerService
           where go
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.List
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -60,7 +60,7 @@
 -- | Lists all deployments for a given project.
 --
 -- /See:/ 'deploymentsList' smart constructor.
-data DeploymentsList = DeploymentsList
+data DeploymentsList = DeploymentsList'
     { _dlProject    :: !Text
     , _dlFilter     :: !(Maybe Text)
     , _dlPageToken  :: !(Maybe Text)
@@ -82,7 +82,7 @@
     :: Text -- ^ 'dlProject'
     -> DeploymentsList
 deploymentsList pDlProject_ =
-    DeploymentsList
+    DeploymentsList'
     { _dlProject = pDlProject_
     , _dlFilter = Nothing
     , _dlPageToken = Nothing
@@ -95,27 +95,39 @@
   = lens _dlProject (\ s a -> s{_dlProject = a})
 
 -- | Sets a filter expression for filtering listed resources, in the form
--- filter={expression}. Your {expression} must be in the format: FIELD_NAME
--- COMPARISON_STRING LITERAL_STRING. The FIELD_NAME is the name of the
+-- filter={expression}. Your {expression} must be in the format: field_name
+-- comparison_string literal_string. The field_name is the name of the
 -- field you want to compare. Only atomic field types are supported
--- (string, number, boolean). The COMPARISON_STRING must be either eq
--- (equals) or ne (not equals). The LITERAL_STRING is the string value to
--- filter to. The literal value must be valid for the type of field
--- (string, number, boolean). For string fields, the literal value is
--- interpreted as a regular expression using RE2 syntax. The literal value
--- must match the entire field. For example, filter=name ne
--- example-instance.
+-- (string, number, boolean). The comparison_string must be either eq
+-- (equals) or ne (not equals). The literal_string is the string value to
+-- filter to. The literal value must be valid for the type of field you are
+-- filtering by (string, number, boolean). For string fields, the literal
+-- value is interpreted as a regular expression using RE2 syntax. The
+-- literal value must match the entire field. For example, to filter for
+-- instances that do not have a name of example-instance, you would use
+-- filter=name ne example-instance. Compute Engine Beta API Only: When
+-- filtering in the Beta API, you can also filter on nested fields. For
+-- example, you could filter on instances that have set the
+-- scheduling.automaticRestart field to true. Use filtering on nested
+-- fields to take advantage of labels to organize and search for results
+-- based on label values. The Beta API also supports filtering on multiple
+-- expressions by providing each separate expression within parentheses.
+-- For example, (scheduling.automaticRestart eq true) (zone eq
+-- us-central1-f). Multiple expressions are treated as AND expressions,
+-- meaning that resources must match all expressions to pass the filters.
 dlFilter :: Lens' DeploymentsList (Maybe Text)
 dlFilter = lens _dlFilter (\ s a -> s{_dlFilter = a})
 
--- | Specifies a page token to use. Use this parameter if you want to list
--- the next page of results. Set pageToken to the nextPageToken returned by
--- a previous list request.
+-- | Specifies a page token to use. Set pageToken to the nextPageToken
+-- returned by a previous list request to get the next page of results.
 dlPageToken :: Lens' DeploymentsList (Maybe Text)
 dlPageToken
   = lens _dlPageToken (\ s a -> s{_dlPageToken = a})
 
--- | Maximum count of results to be returned.
+-- | The maximum number of results per page that should be returned. If the
+-- number of available results is larger than maxResults, Compute Engine
+-- returns a nextPageToken that can be used to get the next page of results
+-- in subsequent list requests.
 dlMaxResults :: Lens' DeploymentsList Word32
 dlMaxResults
   = lens _dlMaxResults (\ s a -> s{_dlMaxResults = a})
@@ -123,7 +135,12 @@
 
 instance GoogleRequest DeploymentsList where
         type Rs DeploymentsList = DeploymentsListResponse
-        requestClient DeploymentsList{..}
+        type Scopes DeploymentsList =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient DeploymentsList'{..}
           = go _dlProject _dlFilter _dlPageToken
               (Just _dlMaxResults)
               (Just AltJSON)
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.Patch
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -69,7 +69,7 @@
 -- deployment manifest. This method supports patch semantics.
 --
 -- /See:/ 'deploymentsPatch' smart constructor.
-data DeploymentsPatch = DeploymentsPatch
+data DeploymentsPatch = DeploymentsPatch'
     { _dpCreatePolicy :: !DeploymentsPatchCreatePolicy
     , _dpProject      :: !Text
     , _dpPayload      :: !Deployment
@@ -99,7 +99,7 @@
     -> Text -- ^ 'dpDeployment'
     -> DeploymentsPatch
 deploymentsPatch pDpProject_ pDpPayload_ pDpDeployment_ =
-    DeploymentsPatch
+    DeploymentsPatch'
     { _dpCreatePolicy = DPCPCreateOrAcquire
     , _dpProject = pDpProject_
     , _dpPayload = pDpPayload_
@@ -132,8 +132,8 @@
 
 -- | If set to true, updates the deployment and creates and updates the
 -- \"shell\" resources but does not actually alter or instantiate these
--- resources. This allows you to preview what your deployment looks like.
--- You can use this intent to preview how an update would affect your
+-- resources. This allows you to preview what your deployment will look
+-- like. You can use this intent to preview how an update would affect your
 -- deployment. You must provide a target.config with a configuration if
 -- this is set to true. After previewing a deployment, you can deploy your
 -- resources by making a request with the update() or you can
@@ -151,7 +151,10 @@
 
 instance GoogleRequest DeploymentsPatch where
         type Rs DeploymentsPatch = Operation
-        requestClient DeploymentsPatch{..}
+        type Scopes DeploymentsPatch =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/ndev.cloudman"]
+        requestClient DeploymentsPatch'{..}
           = go _dpProject _dpDeployment (Just _dpCreatePolicy)
               (Just _dpDeletePolicy)
               (Just _dpPreview)
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/Stop.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/Stop.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/Stop.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/Stop.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.Stop
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -61,7 +61,7 @@
 -- already been completed, but prevents any new work from being started.
 --
 -- /See:/ 'deploymentsStop' smart constructor.
-data DeploymentsStop = DeploymentsStop
+data DeploymentsStop = DeploymentsStop'
     { _dsProject    :: !Text
     , _dsPayload    :: !DeploymentsStopRequest
     , _dsDeployment :: !Text
@@ -82,7 +82,7 @@
     -> Text -- ^ 'dsDeployment'
     -> DeploymentsStop
 deploymentsStop pDsProject_ pDsPayload_ pDsDeployment_ =
-    DeploymentsStop
+    DeploymentsStop'
     { _dsProject = pDsProject_
     , _dsPayload = pDsPayload_
     , _dsDeployment = pDsDeployment_
@@ -105,7 +105,10 @@
 
 instance GoogleRequest DeploymentsStop where
         type Rs DeploymentsStop = Operation
-        requestClient DeploymentsStop{..}
+        type Scopes DeploymentsStop =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/ndev.cloudman"]
+        requestClient DeploymentsStop'{..}
           = go _dsProject _dsDeployment (Just AltJSON)
               _dsPayload
               deploymentManagerService
diff --git a/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs b/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Deployments.Update
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -69,7 +69,7 @@
 -- deployment manifest.
 --
 -- /See:/ 'deploymentsUpdate' smart constructor.
-data DeploymentsUpdate = DeploymentsUpdate
+data DeploymentsUpdate = DeploymentsUpdate'
     { _duCreatePolicy :: !DeploymentsUpdateCreatePolicy
     , _duProject      :: !Text
     , _duPayload      :: !Deployment
@@ -99,7 +99,7 @@
     -> Text -- ^ 'duDeployment'
     -> DeploymentsUpdate
 deploymentsUpdate pDuProject_ pDuPayload_ pDuDeployment_ =
-    DeploymentsUpdate
+    DeploymentsUpdate'
     { _duCreatePolicy = CreateOrAcquire
     , _duProject = pDuProject_
     , _duPayload = pDuPayload_
@@ -132,8 +132,8 @@
 
 -- | If set to true, updates the deployment and creates and updates the
 -- \"shell\" resources but does not actually alter or instantiate these
--- resources. This allows you to preview what your deployment looks like.
--- You can use this intent to preview how an update would affect your
+-- resources. This allows you to preview what your deployment will look
+-- like. You can use this intent to preview how an update would affect your
 -- deployment. You must provide a target.config with a configuration if
 -- this is set to true. After previewing a deployment, you can deploy your
 -- resources by making a request with the update() or you can
@@ -151,7 +151,10 @@
 
 instance GoogleRequest DeploymentsUpdate where
         type Rs DeploymentsUpdate = Operation
-        requestClient DeploymentsUpdate{..}
+        type Scopes DeploymentsUpdate =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/ndev.cloudman"]
+        requestClient DeploymentsUpdate'{..}
           = go _duProject _duDeployment (Just _duCreatePolicy)
               (Just _duDeletePolicy)
               (Just _duPreview)
diff --git a/gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs b/gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Manifests.Get
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -58,7 +58,7 @@
 -- | Gets information about a specific manifest.
 --
 -- /See:/ 'manifestsGet' smart constructor.
-data ManifestsGet = ManifestsGet
+data ManifestsGet = ManifestsGet'
     { _mgProject    :: !Text
     , _mgManifest   :: !Text
     , _mgDeployment :: !Text
@@ -79,7 +79,7 @@
     -> Text -- ^ 'mgDeployment'
     -> ManifestsGet
 manifestsGet pMgProject_ pMgManifest_ pMgDeployment_ =
-    ManifestsGet
+    ManifestsGet'
     { _mgProject = pMgProject_
     , _mgManifest = pMgManifest_
     , _mgDeployment = pMgDeployment_
@@ -102,7 +102,12 @@
 
 instance GoogleRequest ManifestsGet where
         type Rs ManifestsGet = Manifest
-        requestClient ManifestsGet{..}
+        type Scopes ManifestsGet =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient ManifestsGet'{..}
           = go _mgProject _mgDeployment _mgManifest
               (Just AltJSON)
               deploymentManagerService
diff --git a/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs b/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Manifests.List
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -63,7 +63,7 @@
 -- | Lists all manifests for a given deployment.
 --
 -- /See:/ 'manifestsList' smart constructor.
-data ManifestsList = ManifestsList
+data ManifestsList = ManifestsList'
     { _mlProject    :: !Text
     , _mlFilter     :: !(Maybe Text)
     , _mlPageToken  :: !(Maybe Text)
@@ -89,7 +89,7 @@
     -> Text -- ^ 'mlDeployment'
     -> ManifestsList
 manifestsList pMlProject_ pMlDeployment_ =
-    ManifestsList
+    ManifestsList'
     { _mlProject = pMlProject_
     , _mlFilter = Nothing
     , _mlPageToken = Nothing
@@ -103,27 +103,39 @@
   = lens _mlProject (\ s a -> s{_mlProject = a})
 
 -- | Sets a filter expression for filtering listed resources, in the form
--- filter={expression}. Your {expression} must be in the format: FIELD_NAME
--- COMPARISON_STRING LITERAL_STRING. The FIELD_NAME is the name of the
+-- filter={expression}. Your {expression} must be in the format: field_name
+-- comparison_string literal_string. The field_name is the name of the
 -- field you want to compare. Only atomic field types are supported
--- (string, number, boolean). The COMPARISON_STRING must be either eq
--- (equals) or ne (not equals). The LITERAL_STRING is the string value to
--- filter to. The literal value must be valid for the type of field
--- (string, number, boolean). For string fields, the literal value is
--- interpreted as a regular expression using RE2 syntax. The literal value
--- must match the entire field. For example, filter=name ne
--- example-instance.
+-- (string, number, boolean). The comparison_string must be either eq
+-- (equals) or ne (not equals). The literal_string is the string value to
+-- filter to. The literal value must be valid for the type of field you are
+-- filtering by (string, number, boolean). For string fields, the literal
+-- value is interpreted as a regular expression using RE2 syntax. The
+-- literal value must match the entire field. For example, to filter for
+-- instances that do not have a name of example-instance, you would use
+-- filter=name ne example-instance. Compute Engine Beta API Only: When
+-- filtering in the Beta API, you can also filter on nested fields. For
+-- example, you could filter on instances that have set the
+-- scheduling.automaticRestart field to true. Use filtering on nested
+-- fields to take advantage of labels to organize and search for results
+-- based on label values. The Beta API also supports filtering on multiple
+-- expressions by providing each separate expression within parentheses.
+-- For example, (scheduling.automaticRestart eq true) (zone eq
+-- us-central1-f). Multiple expressions are treated as AND expressions,
+-- meaning that resources must match all expressions to pass the filters.
 mlFilter :: Lens' ManifestsList (Maybe Text)
 mlFilter = lens _mlFilter (\ s a -> s{_mlFilter = a})
 
--- | Specifies a page token to use. Use this parameter if you want to list
--- the next page of results. Set pageToken to the nextPageToken returned by
--- a previous list request.
+-- | Specifies a page token to use. Set pageToken to the nextPageToken
+-- returned by a previous list request to get the next page of results.
 mlPageToken :: Lens' ManifestsList (Maybe Text)
 mlPageToken
   = lens _mlPageToken (\ s a -> s{_mlPageToken = a})
 
--- | Maximum count of results to be returned.
+-- | The maximum number of results per page that should be returned. If the
+-- number of available results is larger than maxResults, Compute Engine
+-- returns a nextPageToken that can be used to get the next page of results
+-- in subsequent list requests.
 mlMaxResults :: Lens' ManifestsList Word32
 mlMaxResults
   = lens _mlMaxResults (\ s a -> s{_mlMaxResults = a})
@@ -136,7 +148,12 @@
 
 instance GoogleRequest ManifestsList where
         type Rs ManifestsList = ManifestsListResponse
-        requestClient ManifestsList{..}
+        type Scopes ManifestsList =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient ManifestsList'{..}
           = go _mlProject _mlDeployment _mlFilter _mlPageToken
               (Just _mlMaxResults)
               (Just AltJSON)
diff --git a/gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs b/gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Operations.Get
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -55,7 +55,7 @@
 -- | Gets information about a specific operation.
 --
 -- /See:/ 'operationsGet' smart constructor.
-data OperationsGet = OperationsGet
+data OperationsGet = OperationsGet'
     { _ogProject   :: !Text
     , _ogOperation :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -72,7 +72,7 @@
     -> Text -- ^ 'ogOperation'
     -> OperationsGet
 operationsGet pOgProject_ pOgOperation_ =
-    OperationsGet
+    OperationsGet'
     { _ogProject = pOgProject_
     , _ogOperation = pOgOperation_
     }
@@ -89,7 +89,12 @@
 
 instance GoogleRequest OperationsGet where
         type Rs OperationsGet = Operation
-        requestClient OperationsGet{..}
+        type Scopes OperationsGet =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient OperationsGet'{..}
           = go _ogProject _ogOperation (Just AltJSON)
               deploymentManagerService
           where go
diff --git a/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs b/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Operations.List
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -60,7 +60,7 @@
 -- | Lists all operations for a project.
 --
 -- /See:/ 'operationsList' smart constructor.
-data OperationsList = OperationsList
+data OperationsList = OperationsList'
     { _olProject    :: !Text
     , _olFilter     :: !(Maybe Text)
     , _olPageToken  :: !(Maybe Text)
@@ -82,7 +82,7 @@
     :: Text -- ^ 'olProject'
     -> OperationsList
 operationsList pOlProject_ =
-    OperationsList
+    OperationsList'
     { _olProject = pOlProject_
     , _olFilter = Nothing
     , _olPageToken = Nothing
@@ -95,27 +95,39 @@
   = lens _olProject (\ s a -> s{_olProject = a})
 
 -- | Sets a filter expression for filtering listed resources, in the form
--- filter={expression}. Your {expression} must be in the format: FIELD_NAME
--- COMPARISON_STRING LITERAL_STRING. The FIELD_NAME is the name of the
+-- filter={expression}. Your {expression} must be in the format: field_name
+-- comparison_string literal_string. The field_name is the name of the
 -- field you want to compare. Only atomic field types are supported
--- (string, number, boolean). The COMPARISON_STRING must be either eq
--- (equals) or ne (not equals). The LITERAL_STRING is the string value to
--- filter to. The literal value must be valid for the type of field
--- (string, number, boolean). For string fields, the literal value is
--- interpreted as a regular expression using RE2 syntax. The literal value
--- must match the entire field. For example, filter=name ne
--- example-instance.
+-- (string, number, boolean). The comparison_string must be either eq
+-- (equals) or ne (not equals). The literal_string is the string value to
+-- filter to. The literal value must be valid for the type of field you are
+-- filtering by (string, number, boolean). For string fields, the literal
+-- value is interpreted as a regular expression using RE2 syntax. The
+-- literal value must match the entire field. For example, to filter for
+-- instances that do not have a name of example-instance, you would use
+-- filter=name ne example-instance. Compute Engine Beta API Only: When
+-- filtering in the Beta API, you can also filter on nested fields. For
+-- example, you could filter on instances that have set the
+-- scheduling.automaticRestart field to true. Use filtering on nested
+-- fields to take advantage of labels to organize and search for results
+-- based on label values. The Beta API also supports filtering on multiple
+-- expressions by providing each separate expression within parentheses.
+-- For example, (scheduling.automaticRestart eq true) (zone eq
+-- us-central1-f). Multiple expressions are treated as AND expressions,
+-- meaning that resources must match all expressions to pass the filters.
 olFilter :: Lens' OperationsList (Maybe Text)
 olFilter = lens _olFilter (\ s a -> s{_olFilter = a})
 
--- | Specifies a page token to use. Use this parameter if you want to list
--- the next page of results. Set pageToken to the nextPageToken returned by
--- a previous list request.
+-- | Specifies a page token to use. Set pageToken to the nextPageToken
+-- returned by a previous list request to get the next page of results.
 olPageToken :: Lens' OperationsList (Maybe Text)
 olPageToken
   = lens _olPageToken (\ s a -> s{_olPageToken = a})
 
--- | Maximum count of results to be returned.
+-- | The maximum number of results per page that should be returned. If the
+-- number of available results is larger than maxResults, Compute Engine
+-- returns a nextPageToken that can be used to get the next page of results
+-- in subsequent list requests.
 olMaxResults :: Lens' OperationsList Word32
 olMaxResults
   = lens _olMaxResults (\ s a -> s{_olMaxResults = a})
@@ -123,7 +135,12 @@
 
 instance GoogleRequest OperationsList where
         type Rs OperationsList = OperationsListResponse
-        requestClient OperationsList{..}
+        type Scopes OperationsList =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient OperationsList'{..}
           = go _olProject _olFilter _olPageToken
               (Just _olMaxResults)
               (Just AltJSON)
diff --git a/gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs b/gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Resources.Get
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -58,7 +58,7 @@
 -- | Gets information about a single resource.
 --
 -- /See:/ 'resourcesGet' smart constructor.
-data ResourcesGet = ResourcesGet
+data ResourcesGet = ResourcesGet'
     { _rgProject    :: !Text
     , _rgResource   :: !Text
     , _rgDeployment :: !Text
@@ -79,7 +79,7 @@
     -> Text -- ^ 'rgDeployment'
     -> ResourcesGet
 resourcesGet pRgProject_ pRgResource_ pRgDeployment_ =
-    ResourcesGet
+    ResourcesGet'
     { _rgProject = pRgProject_
     , _rgResource = pRgResource_
     , _rgDeployment = pRgDeployment_
@@ -102,7 +102,12 @@
 
 instance GoogleRequest ResourcesGet where
         type Rs ResourcesGet = Resource
-        requestClient ResourcesGet{..}
+        type Scopes ResourcesGet =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient ResourcesGet'{..}
           = go _rgProject _rgDeployment _rgResource
               (Just AltJSON)
               deploymentManagerService
diff --git a/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs b/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Resources.List
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -63,7 +63,7 @@
 -- | Lists all resources in a given deployment.
 --
 -- /See:/ 'resourcesList' smart constructor.
-data ResourcesList = ResourcesList
+data ResourcesList = ResourcesList'
     { _rlProject    :: !Text
     , _rlFilter     :: !(Maybe Text)
     , _rlPageToken  :: !(Maybe Text)
@@ -89,7 +89,7 @@
     -> Text -- ^ 'rlDeployment'
     -> ResourcesList
 resourcesList pRlProject_ pRlDeployment_ =
-    ResourcesList
+    ResourcesList'
     { _rlProject = pRlProject_
     , _rlFilter = Nothing
     , _rlPageToken = Nothing
@@ -103,27 +103,39 @@
   = lens _rlProject (\ s a -> s{_rlProject = a})
 
 -- | Sets a filter expression for filtering listed resources, in the form
--- filter={expression}. Your {expression} must be in the format: FIELD_NAME
--- COMPARISON_STRING LITERAL_STRING. The FIELD_NAME is the name of the
+-- filter={expression}. Your {expression} must be in the format: field_name
+-- comparison_string literal_string. The field_name is the name of the
 -- field you want to compare. Only atomic field types are supported
--- (string, number, boolean). The COMPARISON_STRING must be either eq
--- (equals) or ne (not equals). The LITERAL_STRING is the string value to
--- filter to. The literal value must be valid for the type of field
--- (string, number, boolean). For string fields, the literal value is
--- interpreted as a regular expression using RE2 syntax. The literal value
--- must match the entire field. For example, filter=name ne
--- example-instance.
+-- (string, number, boolean). The comparison_string must be either eq
+-- (equals) or ne (not equals). The literal_string is the string value to
+-- filter to. The literal value must be valid for the type of field you are
+-- filtering by (string, number, boolean). For string fields, the literal
+-- value is interpreted as a regular expression using RE2 syntax. The
+-- literal value must match the entire field. For example, to filter for
+-- instances that do not have a name of example-instance, you would use
+-- filter=name ne example-instance. Compute Engine Beta API Only: When
+-- filtering in the Beta API, you can also filter on nested fields. For
+-- example, you could filter on instances that have set the
+-- scheduling.automaticRestart field to true. Use filtering on nested
+-- fields to take advantage of labels to organize and search for results
+-- based on label values. The Beta API also supports filtering on multiple
+-- expressions by providing each separate expression within parentheses.
+-- For example, (scheduling.automaticRestart eq true) (zone eq
+-- us-central1-f). Multiple expressions are treated as AND expressions,
+-- meaning that resources must match all expressions to pass the filters.
 rlFilter :: Lens' ResourcesList (Maybe Text)
 rlFilter = lens _rlFilter (\ s a -> s{_rlFilter = a})
 
--- | Specifies a page token to use. Use this parameter if you want to list
--- the next page of results. Set pageToken to the nextPageToken returned by
--- a previous list request.
+-- | Specifies a page token to use. Set pageToken to the nextPageToken
+-- returned by a previous list request to get the next page of results.
 rlPageToken :: Lens' ResourcesList (Maybe Text)
 rlPageToken
   = lens _rlPageToken (\ s a -> s{_rlPageToken = a})
 
--- | Maximum count of results to be returned.
+-- | The maximum number of results per page that should be returned. If the
+-- number of available results is larger than maxResults, Compute Engine
+-- returns a nextPageToken that can be used to get the next page of results
+-- in subsequent list requests.
 rlMaxResults :: Lens' ResourcesList Word32
 rlMaxResults
   = lens _rlMaxResults (\ s a -> s{_rlMaxResults = a})
@@ -136,7 +148,12 @@
 
 instance GoogleRequest ResourcesList where
         type Rs ResourcesList = ResourcesListResponse
-        requestClient ResourcesList{..}
+        type Scopes ResourcesList =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient ResourcesList'{..}
           = go _rlProject _rlDeployment _rlFilter _rlPageToken
               (Just _rlMaxResults)
               (Just AltJSON)
diff --git a/gen/Network/Google/Resource/DeploymentManager/Types/List.hs b/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
--- a/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
+++ b/gen/Network/Google/Resource/DeploymentManager/Types/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.DeploymentManager.Types.List
--- Copyright   : (c) 2015 Brendan Hay
+-- Copyright   : (c) 2015-2016 Brendan Hay
 -- License     : Mozilla Public License, v. 2.0.
 -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
 -- Stability   : auto-generated
@@ -60,7 +60,7 @@
 -- | Lists all resource types for Deployment Manager.
 --
 -- /See:/ 'typesList' smart constructor.
-data TypesList = TypesList
+data TypesList = TypesList'
     { _tlProject    :: !Text
     , _tlFilter     :: !(Maybe Text)
     , _tlPageToken  :: !(Maybe Text)
@@ -82,7 +82,7 @@
     :: Text -- ^ 'tlProject'
     -> TypesList
 typesList pTlProject_ =
-    TypesList
+    TypesList'
     { _tlProject = pTlProject_
     , _tlFilter = Nothing
     , _tlPageToken = Nothing
@@ -95,27 +95,39 @@
   = lens _tlProject (\ s a -> s{_tlProject = a})
 
 -- | Sets a filter expression for filtering listed resources, in the form
--- filter={expression}. Your {expression} must be in the format: FIELD_NAME
--- COMPARISON_STRING LITERAL_STRING. The FIELD_NAME is the name of the
+-- filter={expression}. Your {expression} must be in the format: field_name
+-- comparison_string literal_string. The field_name is the name of the
 -- field you want to compare. Only atomic field types are supported
--- (string, number, boolean). The COMPARISON_STRING must be either eq
--- (equals) or ne (not equals). The LITERAL_STRING is the string value to
--- filter to. The literal value must be valid for the type of field
--- (string, number, boolean). For string fields, the literal value is
--- interpreted as a regular expression using RE2 syntax. The literal value
--- must match the entire field. For example, filter=name ne
--- example-instance.
+-- (string, number, boolean). The comparison_string must be either eq
+-- (equals) or ne (not equals). The literal_string is the string value to
+-- filter to. The literal value must be valid for the type of field you are
+-- filtering by (string, number, boolean). For string fields, the literal
+-- value is interpreted as a regular expression using RE2 syntax. The
+-- literal value must match the entire field. For example, to filter for
+-- instances that do not have a name of example-instance, you would use
+-- filter=name ne example-instance. Compute Engine Beta API Only: When
+-- filtering in the Beta API, you can also filter on nested fields. For
+-- example, you could filter on instances that have set the
+-- scheduling.automaticRestart field to true. Use filtering on nested
+-- fields to take advantage of labels to organize and search for results
+-- based on label values. The Beta API also supports filtering on multiple
+-- expressions by providing each separate expression within parentheses.
+-- For example, (scheduling.automaticRestart eq true) (zone eq
+-- us-central1-f). Multiple expressions are treated as AND expressions,
+-- meaning that resources must match all expressions to pass the filters.
 tlFilter :: Lens' TypesList (Maybe Text)
 tlFilter = lens _tlFilter (\ s a -> s{_tlFilter = a})
 
--- | Specifies a page token to use. Use this parameter if you want to list
--- the next page of results. Set pageToken to the nextPageToken returned by
--- a previous list request.
+-- | Specifies a page token to use. Set pageToken to the nextPageToken
+-- returned by a previous list request to get the next page of results.
 tlPageToken :: Lens' TypesList (Maybe Text)
 tlPageToken
   = lens _tlPageToken (\ s a -> s{_tlPageToken = a})
 
--- | Maximum count of results to be returned.
+-- | The maximum number of results per page that should be returned. If the
+-- number of available results is larger than maxResults, Compute Engine
+-- returns a nextPageToken that can be used to get the next page of results
+-- in subsequent list requests.
 tlMaxResults :: Lens' TypesList Word32
 tlMaxResults
   = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})
@@ -123,7 +135,12 @@
 
 instance GoogleRequest TypesList where
         type Rs TypesList = TypesListResponse
-        requestClient TypesList{..}
+        type Scopes TypesList =
+             '["https://www.googleapis.com/auth/cloud-platform",
+               "https://www.googleapis.com/auth/cloud-platform.read-only",
+               "https://www.googleapis.com/auth/ndev.cloudman",
+               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]
+        requestClient TypesList'{..}
           = go _tlProject _tlFilter _tlPageToken
               (Just _tlMaxResults)
               (Just AltJSON)
diff --git a/gogol-deploymentmanager.cabal b/gogol-deploymentmanager.cabal
--- a/gogol-deploymentmanager.cabal
+++ b/gogol-deploymentmanager.cabal
@@ -1,5 +1,5 @@
 name:                  gogol-deploymentmanager
-version:               0.0.1
+version:               0.1.0
 synopsis:              Google Cloud Deployment Manager SDK.
 homepage:              https://github.com/brendanhay/gogol
 bug-reports:           https://github.com/brendanhay/gogol/issues
@@ -7,15 +7,15 @@
 license-file:          LICENSE
 author:                Brendan Hay
 maintainer:            Brendan Hay <brendan.g.hay@gmail.com>
-copyright:             Copyright (c) 2015 Brendan Hay
+copyright:             Copyright (c) 2015-2016 Brendan Hay
 category:              Network, Google, Cloud
 build-type:            Simple
 cabal-version:         >= 1.10
 extra-source-files:    README.md
 
 description:
-    The Deployment Manager API allows users to declaratively configure,
-    deploy and run complex solutions on the Google Cloud Platform.
+    Declares, configures, and deploys complex solutions on Google Cloud
+    Platform.
     .
     /Warning:/ This is an experimental prototype/preview release which is still
     under exploratory development and not intended for public use, caveat emptor!
@@ -57,5 +57,5 @@
         , Network.Google.DeploymentManager.Types.Sum
 
     build-depends:
-          gogol-core == 0.0.1.*
+          gogol-core == 0.1.0.*
         , base       >= 4.7 && < 5