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/AdSenseHost.hs b/gen/Network/Google/AdSenseHost.hs
--- a/gen/Network/Google/AdSenseHost.hs
+++ b/gen/Network/Google/AdSenseHost.hs
@@ -7,20 +7,23 @@
 
 -- |
 -- Module      : Network.Google.AdSenseHost
--- 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)
 --
--- Gives AdSense Hosts access to report generation, ad code generation, and
--- publisher management capabilities.
+-- Generates performance reports, generates ad codes, and provides
+-- publisher management capabilities for AdSense Hosts.
 --
 -- /See:/ <https://developers.google.com/adsense/host/ AdSense Host API Reference>
 module Network.Google.AdSenseHost
     (
     -- * Service Configuration
       adSenseHostService
+
+    -- * OAuth Scopes
+    , adSenseHostScope
 
     -- * API Declaration
     , AdSenseHostAPI
diff --git a/gen/Network/Google/AdSenseHost/Types.hs b/gen/Network/Google/AdSenseHost/Types.hs
--- a/gen/Network/Google/AdSenseHost/Types.hs
+++ b/gen/Network/Google/AdSenseHost/Types.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE DataKinds          #-}
 {-# LANGUAGE DeriveDataTypeable #-}
 {-# LANGUAGE DeriveGeneric      #-}
 {-# LANGUAGE NoImplicitPrelude  #-}
@@ -7,7 +8,7 @@
 
 -- |
 -- Module      : Network.Google.AdSenseHost.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
@@ -19,7 +20,7 @@
       adSenseHostService
 
     -- * OAuth Scopes
-    , adsensehostScope
+    , adSenseHostScope
 
     -- * AdClients
     , AdClients
@@ -195,11 +196,11 @@
 import           Network.Google.Prelude
 
 -- | Default request referring to version 'v4.1' of the AdSense Host API. This contains the host and root path used as a starting point for constructing service requests.
-adSenseHostService :: Service
+adSenseHostService :: ServiceConfig
 adSenseHostService
   = defaultService (ServiceId "adsensehost:v4.1")
       "www.googleapis.com"
 
 -- | View and manage your AdSense host data and associated accounts
-adsensehostScope :: OAuthScope
-adsensehostScope = "https://www.googleapis.com/auth/adsensehost";
+adSenseHostScope :: Proxy '["https://www.googleapis.com/auth/adsensehost"]
+adSenseHostScope = Proxy;
diff --git a/gen/Network/Google/AdSenseHost/Types/Product.hs b/gen/Network/Google/AdSenseHost/Types/Product.hs
--- a/gen/Network/Google/AdSenseHost/Types/Product.hs
+++ b/gen/Network/Google/AdSenseHost/Types/Product.hs
@@ -9,7 +9,7 @@
 
 -- |
 -- Module      : Network.Google.AdSenseHost.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:/ 'adClients' smart constructor.
-data AdClients = AdClients
+data AdClients = AdClients'
     { _acEtag          :: !(Maybe Text)
     , _acNextPageToken :: !(Maybe Text)
     , _acKind          :: !Text
@@ -43,7 +43,7 @@
 adClients
     :: AdClients
 adClients =
-    AdClients
+    AdClients'
     { _acEtag = Nothing
     , _acNextPageToken = Nothing
     , _acKind = "adsensehost#adClients"
@@ -75,13 +75,13 @@
         parseJSON
           = withObject "AdClients"
               (\ o ->
-                 AdClients <$>
+                 AdClients' <$>
                    (o .:? "etag") <*> (o .:? "nextPageToken") <*>
                      (o .:? "kind" .!= "adsensehost#adClients")
                      <*> (o .:? "items" .!= mempty))
 
 instance ToJSON AdClients where
-        toJSON AdClients{..}
+        toJSON AdClients'{..}
           = object
               (catMaybes
                  [("etag" .=) <$> _acEtag,
@@ -90,7 +90,7 @@
 
 --
 -- /See:/ 'associationSession' smart constructor.
-data AssociationSession = AssociationSession
+data AssociationSession = AssociationSession'
     { _asStatus        :: !(Maybe Text)
     , _asKind          :: !Text
     , _asWebsiteLocale :: !(Maybe Text)
@@ -126,7 +126,7 @@
 associationSession
     :: AssociationSession
 associationSession =
-    AssociationSession
+    AssociationSession'
     { _asStatus = Nothing
     , _asKind = "adsensehost#associationSession"
     , _asWebsiteLocale = Nothing
@@ -165,7 +165,8 @@
 asAccountId
   = lens _asAccountId (\ s a -> s{_asAccountId = a})
 
--- | The products to associate with the user. Options: AFC, AFF, AFS, AFMC
+-- | The products to associate with the user. Options: AFC, AFG, AFV, AFS
+-- (deprecated), AFMC (deprecated)
 asProductCodes :: Lens' AssociationSession [Text]
 asProductCodes
   = lens _asProductCodes
@@ -193,7 +194,7 @@
         parseJSON
           = withObject "AssociationSession"
               (\ o ->
-                 AssociationSession <$>
+                 AssociationSession' <$>
                    (o .:? "status") <*>
                      (o .:? "kind" .!= "adsensehost#associationSession")
                      <*> (o .:? "websiteLocale")
@@ -205,7 +206,7 @@
                      <*> (o .:? "redirectUrl"))
 
 instance ToJSON AssociationSession where
-        toJSON AssociationSession{..}
+        toJSON AssociationSession'{..}
           = object
               (catMaybes
                  [("status" .=) <$> _asStatus,
@@ -220,7 +221,7 @@
 
 --
 -- /See:/ 'accounts' smart constructor.
-data Accounts = Accounts
+data Accounts = Accounts'
     { _aEtag  :: !(Maybe Text)
     , _aKind  :: !Text
     , _aItems :: !(Maybe [Account])
@@ -238,7 +239,7 @@
 accounts
     :: Accounts
 accounts =
-    Accounts
+    Accounts'
     { _aEtag = Nothing
     , _aKind = "adsensehost#accounts"
     , _aItems = Nothing
@@ -262,13 +263,13 @@
         parseJSON
           = withObject "Accounts"
               (\ o ->
-                 Accounts <$>
+                 Accounts' <$>
                    (o .:? "etag") <*>
                      (o .:? "kind" .!= "adsensehost#accounts")
                      <*> (o .:? "items" .!= mempty))
 
 instance ToJSON Accounts where
-        toJSON Accounts{..}
+        toJSON Accounts'{..}
           = object
               (catMaybes
                  [("etag" .=) <$> _aEtag, Just ("kind" .= _aKind),
@@ -276,7 +277,7 @@
 
 --
 -- /See:/ 'adUnits' smart constructor.
-data AdUnits = AdUnits
+data AdUnits = AdUnits'
     { _auEtag          :: !(Maybe Text)
     , _auNextPageToken :: !(Maybe Text)
     , _auKind          :: !Text
@@ -297,7 +298,7 @@
 adUnits
     :: AdUnits
 adUnits =
-    AdUnits
+    AdUnits'
     { _auEtag = Nothing
     , _auNextPageToken = Nothing
     , _auKind = "adsensehost#adUnits"
@@ -329,13 +330,13 @@
         parseJSON
           = withObject "AdUnits"
               (\ o ->
-                 AdUnits <$>
+                 AdUnits' <$>
                    (o .:? "etag") <*> (o .:? "nextPageToken") <*>
                      (o .:? "kind" .!= "adsensehost#adUnits")
                      <*> (o .:? "items" .!= mempty))
 
 instance ToJSON AdUnits where
-        toJSON AdUnits{..}
+        toJSON AdUnits'{..}
           = object
               (catMaybes
                  [("etag" .=) <$> _auEtag,
@@ -344,7 +345,7 @@
 
 --
 -- /See:/ 'urlChannels' smart constructor.
-data URLChannels = URLChannels
+data URLChannels = URLChannels'
     { _ucEtag          :: !(Maybe Text)
     , _ucNextPageToken :: !(Maybe Text)
     , _ucKind          :: !Text
@@ -365,7 +366,7 @@
 urlChannels
     :: URLChannels
 urlChannels =
-    URLChannels
+    URLChannels'
     { _ucEtag = Nothing
     , _ucNextPageToken = Nothing
     , _ucKind = "adsensehost#urlChannels"
@@ -398,13 +399,13 @@
         parseJSON
           = withObject "URLChannels"
               (\ o ->
-                 URLChannels <$>
+                 URLChannels' <$>
                    (o .:? "etag") <*> (o .:? "nextPageToken") <*>
                      (o .:? "kind" .!= "adsensehost#urlChannels")
                      <*> (o .:? "items" .!= mempty))
 
 instance ToJSON URLChannels where
-        toJSON URLChannels{..}
+        toJSON URLChannels'{..}
           = object
               (catMaybes
                  [("etag" .=) <$> _ucEtag,
@@ -413,7 +414,7 @@
 
 --
 -- /See:/ 'customChannels' smart constructor.
-data CustomChannels = CustomChannels
+data CustomChannels = CustomChannels'
     { _ccEtag          :: !(Maybe Text)
     , _ccNextPageToken :: !(Maybe Text)
     , _ccKind          :: !Text
@@ -434,7 +435,7 @@
 customChannels
     :: CustomChannels
 customChannels =
-    CustomChannels
+    CustomChannels'
     { _ccEtag = Nothing
     , _ccNextPageToken = Nothing
     , _ccKind = "adsensehost#customChannels"
@@ -467,13 +468,13 @@
         parseJSON
           = withObject "CustomChannels"
               (\ o ->
-                 CustomChannels <$>
+                 CustomChannels' <$>
                    (o .:? "etag") <*> (o .:? "nextPageToken") <*>
                      (o .:? "kind" .!= "adsensehost#customChannels")
                      <*> (o .:? "items" .!= mempty))
 
 instance ToJSON CustomChannels where
-        toJSON CustomChannels{..}
+        toJSON CustomChannels'{..}
           = object
               (catMaybes
                  [("etag" .=) <$> _ccEtag,
@@ -482,7 +483,7 @@
 
 --
 -- /See:/ 'adUnit' smart constructor.
-data AdUnit = AdUnit
+data AdUnit = AdUnit'
     { _auuStatus                   :: !(Maybe Text)
     , _auuMobileContentAdsSettings :: !(Maybe AdUnitMobileContentAdsSettings)
     , _auuKind                     :: !Text
@@ -515,7 +516,7 @@
 adUnit
     :: AdUnit
 adUnit =
-    AdUnit
+    AdUnit'
     { _auuStatus = Nothing
     , _auuMobileContentAdsSettings = Nothing
     , _auuKind = "adsensehost#adUnit"
@@ -535,7 +536,7 @@
 auuStatus
   = lens _auuStatus (\ s a -> s{_auuStatus = a})
 
--- | Settings specific to WAP mobile content ads (AFMC).
+-- | Settings specific to WAP mobile content ads (AFMC - deprecated).
 auuMobileContentAdsSettings :: Lens' AdUnit (Maybe AdUnitMobileContentAdsSettings)
 auuMobileContentAdsSettings
   = lens _auuMobileContentAdsSettings
@@ -556,7 +557,7 @@
 auuName = lens _auuName (\ s a -> s{_auuName = a})
 
 -- | Settings specific to content ads (AFC) and highend mobile content ads
--- (AFMC).
+-- (AFMC - deprecated).
 auuContentAdsSettings :: Lens' AdUnit (Maybe AdUnitContentAdsSettings)
 auuContentAdsSettings
   = lens _auuContentAdsSettings
@@ -575,7 +576,7 @@
         parseJSON
           = withObject "AdUnit"
               (\ o ->
-                 AdUnit <$>
+                 AdUnit' <$>
                    (o .:? "status") <*>
                      (o .:? "mobileContentAdsSettings")
                      <*> (o .:? "kind" .!= "adsensehost#adUnit")
@@ -586,7 +587,7 @@
                      <*> (o .:? "id"))
 
 instance ToJSON AdUnit where
-        toJSON AdUnit{..}
+        toJSON AdUnit'{..}
           = object
               (catMaybes
                  [("status" .=) <$> _auuStatus,
@@ -600,7 +601,7 @@
 
 --
 -- /See:/ 'report' smart constructor.
-data Report = Report
+data Report = Report'
     { _rKind             :: !Text
     , _rAverages         :: !(Maybe [Text])
     , _rWarnings         :: !(Maybe [Text])
@@ -630,7 +631,7 @@
 report
     :: Report
 report =
-    Report
+    Report'
     { _rKind = "adsensehost#report"
     , _rAverages = Nothing
     , _rWarnings = Nothing
@@ -697,7 +698,7 @@
         parseJSON
           = withObject "Report"
               (\ o ->
-                 Report <$>
+                 Report' <$>
                    (o .:? "kind" .!= "adsensehost#report") <*>
                      (o .:? "averages" .!= mempty)
                      <*> (o .:? "warnings" .!= mempty)
@@ -707,7 +708,7 @@
                      <*> (o .:? "totalMatchedRows"))
 
 instance ToJSON Report where
-        toJSON Report{..}
+        toJSON Report'{..}
           = object
               (catMaybes
                  [Just ("kind" .= _rKind),
@@ -720,7 +721,7 @@
 -- | The font which is included in the style.
 --
 -- /See:/ 'adStyleFont' smart constructor.
-data AdStyleFont = AdStyleFont
+data AdStyleFont = AdStyleFont'
     { _asfSize   :: !(Maybe Text)
     , _asfFamily :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -735,7 +736,7 @@
 adStyleFont
     :: AdStyleFont
 adStyleFont =
-    AdStyleFont
+    AdStyleFont'
     { _asfSize = Nothing
     , _asfFamily = Nothing
     }
@@ -755,10 +756,10 @@
         parseJSON
           = withObject "AdStyleFont"
               (\ o ->
-                 AdStyleFont <$> (o .:? "size") <*> (o .:? "family"))
+                 AdStyleFont' <$> (o .:? "size") <*> (o .:? "family"))
 
 instance ToJSON AdStyleFont where
-        toJSON AdStyleFont{..}
+        toJSON AdStyleFont'{..}
           = object
               (catMaybes
                  [("size" .=) <$> _asfSize,
@@ -766,7 +767,7 @@
 
 --
 -- /See:/ 'account' smart constructor.
-data Account = Account
+data Account = Account'
     { _accStatus :: !(Maybe Text)
     , _accKind   :: !Text
     , _accName   :: !(Maybe Text)
@@ -787,7 +788,7 @@
 account
     :: Account
 account =
-    Account
+    Account'
     { _accStatus = Nothing
     , _accKind = "adsensehost#account"
     , _accName = Nothing
@@ -815,24 +816,24 @@
         parseJSON
           = withObject "Account"
               (\ o ->
-                 Account <$>
+                 Account' <$>
                    (o .:? "status") <*>
                      (o .:? "kind" .!= "adsensehost#account")
                      <*> (o .:? "name")
                      <*> (o .:? "id"))
 
 instance ToJSON Account where
-        toJSON Account{..}
+        toJSON Account'{..}
           = object
               (catMaybes
                  [("status" .=) <$> _accStatus,
                   Just ("kind" .= _accKind), ("name" .=) <$> _accName,
                   ("id" .=) <$> _accId])
 
--- | Settings specific to WAP mobile content ads (AFMC).
+-- | Settings specific to WAP mobile content ads (AFMC - deprecated).
 --
 -- /See:/ 'adUnitMobileContentAdsSettings' smart constructor.
-data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings
+data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings'
     { _aumcasSize              :: !(Maybe Text)
     , _aumcasScriptingLanguage :: !(Maybe Text)
     , _aumcasMarkupLanguage    :: !(Maybe Text)
@@ -853,7 +854,7 @@
 adUnitMobileContentAdsSettings
     :: AdUnitMobileContentAdsSettings
 adUnitMobileContentAdsSettings =
-    AdUnitMobileContentAdsSettings
+    AdUnitMobileContentAdsSettings'
     { _aumcasSize = Nothing
     , _aumcasScriptingLanguage = Nothing
     , _aumcasMarkupLanguage = Nothing
@@ -887,13 +888,13 @@
         parseJSON
           = withObject "AdUnitMobileContentAdsSettings"
               (\ o ->
-                 AdUnitMobileContentAdsSettings <$>
+                 AdUnitMobileContentAdsSettings' <$>
                    (o .:? "size") <*> (o .:? "scriptingLanguage") <*>
                      (o .:? "markupLanguage")
                      <*> (o .:? "type"))
 
 instance ToJSON AdUnitMobileContentAdsSettings where
-        toJSON AdUnitMobileContentAdsSettings{..}
+        toJSON AdUnitMobileContentAdsSettings'{..}
           = object
               (catMaybes
                  [("size" .=) <$> _aumcasSize,
@@ -907,7 +908,7 @@
 -- leading hash.
 --
 -- /See:/ 'adStyleColors' smart constructor.
-data AdStyleColors = AdStyleColors
+data AdStyleColors = AdStyleColors'
     { _ascText       :: !(Maybe Text)
     , _ascURL        :: !(Maybe Text)
     , _ascBOrder     :: !(Maybe Text)
@@ -931,7 +932,7 @@
 adStyleColors
     :: AdStyleColors
 adStyleColors =
-    AdStyleColors
+    AdStyleColors'
     { _ascText = Nothing
     , _ascURL = Nothing
     , _ascBOrder = Nothing
@@ -966,13 +967,13 @@
         parseJSON
           = withObject "AdStyleColors"
               (\ o ->
-                 AdStyleColors <$>
+                 AdStyleColors' <$>
                    (o .:? "text") <*> (o .:? "url") <*> (o .:? "border")
                      <*> (o .:? "title")
                      <*> (o .:? "background"))
 
 instance ToJSON AdStyleColors where
-        toJSON AdStyleColors{..}
+        toJSON AdStyleColors'{..}
           = object
               (catMaybes
                  [("text" .=) <$> _ascText, ("url" .=) <$> _ascURL,
@@ -983,7 +984,7 @@
 -- | The backup option to be used in instances where no ad is available.
 --
 -- /See:/ 'adUnitContentAdsSettingsBackupOption' smart constructor.
-data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption
+data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption'
     { _aucasboColor :: !(Maybe Text)
     , _aucasboURL   :: !(Maybe Text)
     , _aucasboType  :: !(Maybe Text)
@@ -1001,7 +1002,7 @@
 adUnitContentAdsSettingsBackupOption
     :: AdUnitContentAdsSettingsBackupOption
 adUnitContentAdsSettingsBackupOption =
-    AdUnitContentAdsSettingsBackupOption
+    AdUnitContentAdsSettingsBackupOption'
     { _aucasboColor = Nothing
     , _aucasboURL = Nothing
     , _aucasboType = Nothing
@@ -1029,12 +1030,12 @@
         parseJSON
           = withObject "AdUnitContentAdsSettingsBackupOption"
               (\ o ->
-                 AdUnitContentAdsSettingsBackupOption <$>
+                 AdUnitContentAdsSettingsBackupOption' <$>
                    (o .:? "color") <*> (o .:? "url") <*> (o .:? "type"))
 
 instance ToJSON AdUnitContentAdsSettingsBackupOption
          where
-        toJSON AdUnitContentAdsSettingsBackupOption{..}
+        toJSON AdUnitContentAdsSettingsBackupOption'{..}
           = object
               (catMaybes
                  [("color" .=) <$> _aucasboColor,
@@ -1043,7 +1044,7 @@
 
 --
 -- /See:/ 'adClient' smart constructor.
-data AdClient = AdClient
+data AdClient = AdClient'
     { _adKind              :: !Text
     , _adArcOptIn          :: !(Maybe Bool)
     , _adSupportsReporting :: !(Maybe Bool)
@@ -1067,7 +1068,7 @@
 adClient
     :: AdClient
 adClient =
-    AdClient
+    AdClient'
     { _adKind = "adsensehost#adClient"
     , _adArcOptIn = Nothing
     , _adSupportsReporting = Nothing
@@ -1105,7 +1106,7 @@
         parseJSON
           = withObject "AdClient"
               (\ o ->
-                 AdClient <$>
+                 AdClient' <$>
                    (o .:? "kind" .!= "adsensehost#adClient") <*>
                      (o .:? "arcOptIn")
                      <*> (o .:? "supportsReporting")
@@ -1113,7 +1114,7 @@
                      <*> (o .:? "productCode"))
 
 instance ToJSON AdClient where
-        toJSON AdClient{..}
+        toJSON AdClient'{..}
           = object
               (catMaybes
                  [Just ("kind" .= _adKind),
@@ -1124,7 +1125,7 @@
 
 --
 -- /See:/ 'reportHeadersItem' smart constructor.
-data ReportHeadersItem = ReportHeadersItem
+data ReportHeadersItem = ReportHeadersItem'
     { _rhiName     :: !(Maybe Text)
     , _rhiCurrency :: !(Maybe Text)
     , _rhiType     :: !(Maybe Text)
@@ -1142,7 +1143,7 @@
 reportHeadersItem
     :: ReportHeadersItem
 reportHeadersItem =
-    ReportHeadersItem
+    ReportHeadersItem'
     { _rhiName = Nothing
     , _rhiCurrency = Nothing
     , _rhiType = Nothing
@@ -1167,12 +1168,12 @@
         parseJSON
           = withObject "ReportHeadersItem"
               (\ o ->
-                 ReportHeadersItem <$>
+                 ReportHeadersItem' <$>
                    (o .:? "name") <*> (o .:? "currency") <*>
                      (o .:? "type"))
 
 instance ToJSON ReportHeadersItem where
-        toJSON ReportHeadersItem{..}
+        toJSON ReportHeadersItem'{..}
           = object
               (catMaybes
                  [("name" .=) <$> _rhiName,
@@ -1181,7 +1182,7 @@
 
 --
 -- /See:/ 'adStyle' smart constructor.
-data AdStyle = AdStyle
+data AdStyle = AdStyle'
     { _assCorners :: !(Maybe Text)
     , _assKind    :: !Text
     , _assFont    :: !(Maybe AdStyleFont)
@@ -1202,7 +1203,7 @@
 adStyle
     :: AdStyle
 adStyle =
-    AdStyle
+    AdStyle'
     { _assCorners = Nothing
     , _assKind = "adsensehost#adStyle"
     , _assFont = Nothing
@@ -1234,14 +1235,14 @@
         parseJSON
           = withObject "AdStyle"
               (\ o ->
-                 AdStyle <$>
+                 AdStyle' <$>
                    (o .:? "corners") <*>
                      (o .:? "kind" .!= "adsensehost#adStyle")
                      <*> (o .:? "font")
                      <*> (o .:? "colors"))
 
 instance ToJSON AdStyle where
-        toJSON AdStyle{..}
+        toJSON AdStyle'{..}
           = object
               (catMaybes
                  [("corners" .=) <$> _assCorners,
@@ -1250,7 +1251,7 @@
 
 --
 -- /See:/ 'customChannel' smart constructor.
-data CustomChannel = CustomChannel
+data CustomChannel = CustomChannel'
     { _cKind :: !Text
     , _cName :: !(Maybe Text)
     , _cCode :: !(Maybe Text)
@@ -1271,7 +1272,7 @@
 customChannel
     :: CustomChannel
 customChannel =
-    CustomChannel
+    CustomChannel'
     { _cKind = "adsensehost#customChannel"
     , _cName = Nothing
     , _cCode = Nothing
@@ -1300,14 +1301,14 @@
         parseJSON
           = withObject "CustomChannel"
               (\ o ->
-                 CustomChannel <$>
+                 CustomChannel' <$>
                    (o .:? "kind" .!= "adsensehost#customChannel") <*>
                      (o .:? "name")
                      <*> (o .:? "code")
                      <*> (o .:? "id"))
 
 instance ToJSON CustomChannel where
-        toJSON CustomChannel{..}
+        toJSON CustomChannel'{..}
           = object
               (catMaybes
                  [Just ("kind" .= _cKind), ("name" .=) <$> _cName,
@@ -1315,7 +1316,7 @@
 
 --
 -- /See:/ 'urlChannel' smart constructor.
-data URLChannel = URLChannel
+data URLChannel = URLChannel'
     { _urlcKind       :: !Text
     , _urlcId         :: !(Maybe Text)
     , _urlcURLPattern :: !(Maybe Text)
@@ -1333,7 +1334,7 @@
 urlChannel
     :: URLChannel
 urlChannel =
-    URLChannel
+    URLChannel'
     { _urlcKind = "adsensehost#urlChannel"
     , _urlcId = Nothing
     , _urlcURLPattern = Nothing
@@ -1360,13 +1361,13 @@
         parseJSON
           = withObject "URLChannel"
               (\ o ->
-                 URLChannel <$>
+                 URLChannel' <$>
                    (o .:? "kind" .!= "adsensehost#urlChannel") <*>
                      (o .:? "id")
                      <*> (o .:? "urlPattern"))
 
 instance ToJSON URLChannel where
-        toJSON URLChannel{..}
+        toJSON URLChannel'{..}
           = object
               (catMaybes
                  [Just ("kind" .= _urlcKind), ("id" .=) <$> _urlcId,
@@ -1374,7 +1375,7 @@
 
 --
 -- /See:/ 'adCode' smart constructor.
-data AdCode = AdCode
+data AdCode = AdCode'
     { _aaKind   :: !Text
     , _aaAdCode :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1389,7 +1390,7 @@
 adCode
     :: AdCode
 adCode =
-    AdCode
+    AdCode'
     { _aaKind = "adsensehost#adCode"
     , _aaAdCode = Nothing
     }
@@ -1406,22 +1407,22 @@
         parseJSON
           = withObject "AdCode"
               (\ o ->
-                 AdCode <$>
+                 AdCode' <$>
                    (o .:? "kind" .!= "adsensehost#adCode") <*>
                      (o .:? "adCode"))
 
 instance ToJSON AdCode where
-        toJSON AdCode{..}
+        toJSON AdCode'{..}
           = object
               (catMaybes
                  [Just ("kind" .= _aaKind),
                   ("adCode" .=) <$> _aaAdCode])
 
 -- | Settings specific to content ads (AFC) and highend mobile content ads
--- (AFMC).
+-- (AFMC - deprecated).
 --
 -- /See:/ 'adUnitContentAdsSettings' smart constructor.
-data AdUnitContentAdsSettings = AdUnitContentAdsSettings
+data AdUnitContentAdsSettings = AdUnitContentAdsSettings'
     { _aucasBackupOption :: !(Maybe AdUnitContentAdsSettingsBackupOption)
     , _aucasSize         :: !(Maybe Text)
     , _aucasType         :: !(Maybe Text)
@@ -1439,7 +1440,7 @@
 adUnitContentAdsSettings
     :: AdUnitContentAdsSettings
 adUnitContentAdsSettings =
-    AdUnitContentAdsSettings
+    AdUnitContentAdsSettings'
     { _aucasBackupOption = Nothing
     , _aucasSize = Nothing
     , _aucasType = Nothing
@@ -1466,12 +1467,12 @@
         parseJSON
           = withObject "AdUnitContentAdsSettings"
               (\ o ->
-                 AdUnitContentAdsSettings <$>
+                 AdUnitContentAdsSettings' <$>
                    (o .:? "backupOption") <*> (o .:? "size") <*>
                      (o .:? "type"))
 
 instance ToJSON AdUnitContentAdsSettings where
-        toJSON AdUnitContentAdsSettings{..}
+        toJSON AdUnitContentAdsSettings'{..}
           = object
               (catMaybes
                  [("backupOption" .=) <$> _aucasBackupOption,
diff --git a/gen/Network/Google/AdSenseHost/Types/Sum.hs b/gen/Network/Google/AdSenseHost/Types/Sum.hs
--- a/gen/Network/Google/AdSenseHost/Types/Sum.hs
+++ b/gen/Network/Google/AdSenseHost/Types/Sum.hs
@@ -8,7 +8,7 @@
 
 -- |
 -- Module      : Network.Google.AdSenseHost.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
@@ -28,28 +28,28 @@
       -- AdSense For Games
     | Afmc
       -- ^ @AFMC@
-      -- AdSense For Mobile Content
+      -- AdSense For Mobile Content - deprecated
     | Afs
       -- ^ @AFS@
-      -- AdSense For Search
+      -- AdSense For Search - deprecated
     | Afv
       -- ^ @AFV@
       -- AdSense For Video
-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
 
 instance Hashable AssociationSessionsStartProductCode
 
-instance FromText AssociationSessionsStartProductCode where
-    fromText = \case
-        "AFC" -> Just Afc
-        "AFG" -> Just Afg
-        "AFMC" -> Just Afmc
-        "AFS" -> Just Afs
-        "AFV" -> Just Afv
-        _ -> Nothing
+instance FromHttpApiData AssociationSessionsStartProductCode where
+    parseQueryParam = \case
+        "AFC" -> Right Afc
+        "AFG" -> Right Afg
+        "AFMC" -> Right Afmc
+        "AFS" -> Right Afs
+        "AFV" -> Right Afv
+        x -> Left ("Unable to parse AssociationSessionsStartProductCode from: " <> x)
 
-instance ToText AssociationSessionsStartProductCode where
-    toText = \case
+instance ToHttpApiData AssociationSessionsStartProductCode where
+    toQueryParam = \case
         Afc -> "AFC"
         Afg -> "AFG"
         Afmc -> "AFMC"
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/Get.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/Get.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/Get.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdClients.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
@@ -56,7 +56,7 @@
 -- publisher\'s AdSense account.
 --
 -- /See:/ 'accountsAdClientsGet' smart constructor.
-data AccountsAdClientsGet = AccountsAdClientsGet
+data AccountsAdClientsGet = AccountsAdClientsGet'
     { _aacgAdClientId :: !Text
     , _aacgAccountId  :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -73,7 +73,7 @@
     -> Text -- ^ 'aacgAccountId'
     -> AccountsAdClientsGet
 accountsAdClientsGet pAacgAdClientId_ pAacgAccountId_ =
-    AccountsAdClientsGet
+    AccountsAdClientsGet'
     { _aacgAdClientId = pAacgAdClientId_
     , _aacgAccountId = pAacgAccountId_
     }
@@ -92,7 +92,9 @@
 
 instance GoogleRequest AccountsAdClientsGet where
         type Rs AccountsAdClientsGet = AdClient
-        requestClient AccountsAdClientsGet{..}
+        type Scopes AccountsAdClientsGet =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdClientsGet'{..}
           = go _aacgAccountId _aacgAdClientId (Just AltJSON)
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/List.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/List.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/List.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdClients.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
@@ -56,7 +56,7 @@
 -- | List all hosted ad clients in the specified hosted account.
 --
 -- /See:/ 'accountsAdClientsList' smart constructor.
-data AccountsAdClientsList = AccountsAdClientsList
+data AccountsAdClientsList = AccountsAdClientsList'
     { _aaclAccountId  :: !Text
     , _aaclPageToken  :: !(Maybe Text)
     , _aaclMaxResults :: !(Maybe (Textual Word32))
@@ -75,7 +75,7 @@
     :: Text -- ^ 'aaclAccountId'
     -> AccountsAdClientsList
 accountsAdClientsList pAaclAccountId_ =
-    AccountsAdClientsList
+    AccountsAdClientsList'
     { _aaclAccountId = pAaclAccountId_
     , _aaclPageToken = Nothing
     , _aaclMaxResults = Nothing
@@ -105,7 +105,9 @@
 
 instance GoogleRequest AccountsAdClientsList where
         type Rs AccountsAdClientsList = AdClients
-        requestClient AccountsAdClientsList{..}
+        type Scopes AccountsAdClientsList =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdClientsList'{..}
           = go _aaclAccountId _aaclPageToken _aaclMaxResults
               (Just AltJSON)
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Delete.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Delete.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Delete.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Delete.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.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
@@ -59,7 +59,7 @@
 -- account.
 --
 -- /See:/ 'accountsAdUnitsDelete' smart constructor.
-data AccountsAdUnitsDelete = AccountsAdUnitsDelete
+data AccountsAdUnitsDelete = AccountsAdUnitsDelete'
     { _aaudAdUnitId   :: !Text
     , _aaudAdClientId :: !Text
     , _aaudAccountId  :: !Text
@@ -80,7 +80,7 @@
     -> Text -- ^ 'aaudAccountId'
     -> AccountsAdUnitsDelete
 accountsAdUnitsDelete pAaudAdUnitId_ pAaudAdClientId_ pAaudAccountId_ =
-    AccountsAdUnitsDelete
+    AccountsAdUnitsDelete'
     { _aaudAdUnitId = pAaudAdUnitId_
     , _aaudAdClientId = pAaudAdClientId_
     , _aaudAccountId = pAaudAccountId_
@@ -105,7 +105,9 @@
 
 instance GoogleRequest AccountsAdUnitsDelete where
         type Rs AccountsAdUnitsDelete = AdUnit
-        requestClient AccountsAdUnitsDelete{..}
+        type Scopes AccountsAdUnitsDelete =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsDelete'{..}
           = go _aaudAccountId _aaudAdClientId _aaudAdUnitId
               (Just AltJSON)
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Get.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Get.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Get.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.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
@@ -57,7 +57,7 @@
 -- | Get the specified host ad unit in this AdSense account.
 --
 -- /See:/ 'accountsAdUnitsGet' smart constructor.
-data AccountsAdUnitsGet = AccountsAdUnitsGet
+data AccountsAdUnitsGet = AccountsAdUnitsGet'
     { _aaugAdUnitId   :: !Text
     , _aaugAdClientId :: !Text
     , _aaugAccountId  :: !Text
@@ -78,7 +78,7 @@
     -> Text -- ^ 'aaugAccountId'
     -> AccountsAdUnitsGet
 accountsAdUnitsGet pAaugAdUnitId_ pAaugAdClientId_ pAaugAccountId_ =
-    AccountsAdUnitsGet
+    AccountsAdUnitsGet'
     { _aaugAdUnitId = pAaugAdUnitId_
     , _aaugAdClientId = pAaugAdClientId_
     , _aaugAccountId = pAaugAccountId_
@@ -103,7 +103,9 @@
 
 instance GoogleRequest AccountsAdUnitsGet where
         type Rs AccountsAdUnitsGet = AdUnit
-        requestClient AccountsAdUnitsGet{..}
+        type Scopes AccountsAdUnitsGet =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsGet'{..}
           = go _aaugAccountId _aaugAdClientId _aaugAdUnitId
               (Just AltJSON)
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/GetAdCode.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/GetAdCode.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/GetAdCode.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/GetAdCode.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.GetAdCode
--- 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
@@ -62,7 +62,7 @@
 -- custom channels.
 --
 -- /See:/ 'accountsAdUnitsGetAdCode' smart constructor.
-data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode
+data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode'
     { _aaugacAdUnitId            :: !Text
     , _aaugacAdClientId          :: !Text
     , _aaugacAccountId           :: !Text
@@ -86,7 +86,7 @@
     -> Text -- ^ 'aaugacAccountId'
     -> AccountsAdUnitsGetAdCode
 accountsAdUnitsGetAdCode pAaugacAdUnitId_ pAaugacAdClientId_ pAaugacAccountId_ =
-    AccountsAdUnitsGetAdCode
+    AccountsAdUnitsGetAdCode'
     { _aaugacAdUnitId = pAaugacAdUnitId_
     , _aaugacAdClientId = pAaugacAdClientId_
     , _aaugacAccountId = pAaugacAccountId_
@@ -121,7 +121,9 @@
 
 instance GoogleRequest AccountsAdUnitsGetAdCode where
         type Rs AccountsAdUnitsGetAdCode = AdCode
-        requestClient AccountsAdUnitsGetAdCode{..}
+        type Scopes AccountsAdUnitsGetAdCode =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsGetAdCode'{..}
           = go _aaugacAccountId _aaugacAdClientId
               _aaugacAdUnitId
               (_aaugacHostCustomChannelId ^. _Default)
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Insert.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Insert.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Insert.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Insert.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.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 @@
 -- account.
 --
 -- /See:/ 'accountsAdUnitsInsert' smart constructor.
-data AccountsAdUnitsInsert = AccountsAdUnitsInsert
+data AccountsAdUnitsInsert = AccountsAdUnitsInsert'
     { _aauiPayload    :: !AdUnit
     , _aauiAdClientId :: !Text
     , _aauiAccountId  :: !Text
@@ -80,7 +80,7 @@
     -> Text -- ^ 'aauiAccountId'
     -> AccountsAdUnitsInsert
 accountsAdUnitsInsert pAauiPayload_ pAauiAdClientId_ pAauiAccountId_ =
-    AccountsAdUnitsInsert
+    AccountsAdUnitsInsert'
     { _aauiPayload = pAauiPayload_
     , _aauiAdClientId = pAauiAdClientId_
     , _aauiAccountId = pAauiAccountId_
@@ -105,7 +105,9 @@
 
 instance GoogleRequest AccountsAdUnitsInsert where
         type Rs AccountsAdUnitsInsert = AdUnit
-        requestClient AccountsAdUnitsInsert{..}
+        type Scopes AccountsAdUnitsInsert =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsInsert'{..}
           = go _aauiAccountId _aauiAdClientId (Just AltJSON)
               _aauiPayload
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/List.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/List.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/List.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.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
@@ -61,7 +61,7 @@
 -- | List all ad units in the specified publisher\'s AdSense account.
 --
 -- /See:/ 'accountsAdUnitsList' smart constructor.
-data AccountsAdUnitsList = AccountsAdUnitsList
+data AccountsAdUnitsList = AccountsAdUnitsList'
     { _aaulIncludeInactive :: !(Maybe Bool)
     , _aaulAdClientId      :: !Text
     , _aaulAccountId       :: !Text
@@ -87,7 +87,7 @@
     -> Text -- ^ 'aaulAccountId'
     -> AccountsAdUnitsList
 accountsAdUnitsList pAaulAdClientId_ pAaulAccountId_ =
-    AccountsAdUnitsList
+    AccountsAdUnitsList'
     { _aaulIncludeInactive = Nothing
     , _aaulAdClientId = pAaulAdClientId_
     , _aaulAccountId = pAaulAccountId_
@@ -131,7 +131,9 @@
 
 instance GoogleRequest AccountsAdUnitsList where
         type Rs AccountsAdUnitsList = AdUnits
-        requestClient AccountsAdUnitsList{..}
+        type Scopes AccountsAdUnitsList =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsList'{..}
           = go _aaulAccountId _aaulAdClientId
               _aaulIncludeInactive
               _aaulPageToken
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Patch.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Patch.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Patch.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Patch.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.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
@@ -61,7 +61,7 @@
 -- This method supports patch semantics.
 --
 -- /See:/ 'accountsAdUnitsPatch' smart constructor.
-data AccountsAdUnitsPatch = AccountsAdUnitsPatch
+data AccountsAdUnitsPatch = AccountsAdUnitsPatch'
     { _aaupAdUnitId   :: !Text
     , _aaupPayload    :: !AdUnit
     , _aaupAdClientId :: !Text
@@ -86,7 +86,7 @@
     -> Text -- ^ 'aaupAccountId'
     -> AccountsAdUnitsPatch
 accountsAdUnitsPatch pAaupAdUnitId_ pAaupPayload_ pAaupAdClientId_ pAaupAccountId_ =
-    AccountsAdUnitsPatch
+    AccountsAdUnitsPatch'
     { _aaupAdUnitId = pAaupAdUnitId_
     , _aaupPayload = pAaupPayload_
     , _aaupAdClientId = pAaupAdClientId_
@@ -117,7 +117,9 @@
 
 instance GoogleRequest AccountsAdUnitsPatch where
         type Rs AccountsAdUnitsPatch = AdUnit
-        requestClient AccountsAdUnitsPatch{..}
+        type Scopes AccountsAdUnitsPatch =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsPatch'{..}
           = go _aaupAccountId _aaupAdClientId
               (Just _aaupAdUnitId)
               (Just AltJSON)
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Update.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Update.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Update.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Update.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.AdUnits.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
@@ -57,7 +57,7 @@
 -- | Update the supplied ad unit in the specified publisher AdSense account.
 --
 -- /See:/ 'accountsAdUnitsUpdate' smart constructor.
-data AccountsAdUnitsUpdate = AccountsAdUnitsUpdate
+data AccountsAdUnitsUpdate = AccountsAdUnitsUpdate'
     { _aauuPayload    :: !AdUnit
     , _aauuAdClientId :: !Text
     , _aauuAccountId  :: !Text
@@ -78,7 +78,7 @@
     -> Text -- ^ 'aauuAccountId'
     -> AccountsAdUnitsUpdate
 accountsAdUnitsUpdate pAauuPayload_ pAauuAdClientId_ pAauuAccountId_ =
-    AccountsAdUnitsUpdate
+    AccountsAdUnitsUpdate'
     { _aauuPayload = pAauuPayload_
     , _aauuAdClientId = pAauuAdClientId_
     , _aauuAccountId = pAauuAccountId_
@@ -103,7 +103,9 @@
 
 instance GoogleRequest AccountsAdUnitsUpdate where
         type Rs AccountsAdUnitsUpdate = AdUnit
-        requestClient AccountsAdUnitsUpdate{..}
+        type Scopes AccountsAdUnitsUpdate =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsAdUnitsUpdate'{..}
           = go _aauuAccountId _aauuAdClientId (Just AltJSON)
               _aauuPayload
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/Get.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/Get.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/Get.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.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
@@ -51,7 +51,7 @@
 -- | Get information about the selected associated AdSense account.
 --
 -- /See:/ 'accountsGet' smart constructor.
-newtype AccountsGet = AccountsGet
+newtype AccountsGet = AccountsGet'
     { _agAccountId :: Text
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -64,7 +64,7 @@
     :: Text -- ^ 'agAccountId'
     -> AccountsGet
 accountsGet pAgAccountId_ =
-    AccountsGet
+    AccountsGet'
     { _agAccountId = pAgAccountId_
     }
 
@@ -75,7 +75,9 @@
 
 instance GoogleRequest AccountsGet where
         type Rs AccountsGet = Account
-        requestClient AccountsGet{..}
+        type Scopes AccountsGet =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsGet'{..}
           = go _agAccountId (Just AltJSON) adSenseHostService
           where go
                   = buildClient (Proxy :: Proxy AccountsGetResource)
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/List.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/List.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/List.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.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
@@ -53,7 +53,7 @@
 -- id.
 --
 -- /See:/ 'accountsList' smart constructor.
-newtype AccountsList = AccountsList
+newtype AccountsList = AccountsList'
     { _alFilterAdClientId :: [Text]
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -66,7 +66,7 @@
     :: [Text] -- ^ 'alFilterAdClientId'
     -> AccountsList
 accountsList pAlFilterAdClientId_ =
-    AccountsList
+    AccountsList'
     { _alFilterAdClientId = _Coerce # pAlFilterAdClientId_
     }
 
@@ -79,7 +79,9 @@
 
 instance GoogleRequest AccountsList where
         type Rs AccountsList = Accounts
-        requestClient AccountsList{..}
+        type Scopes AccountsList =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsList'{..}
           = go _alFilterAdClientId (Just AltJSON)
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/Accounts/Reports/Generate.hs b/gen/Network/Google/Resource/AdSenseHost/Accounts/Reports/Generate.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Accounts/Reports/Generate.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Accounts/Reports/Generate.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Accounts.Reports.Generate
--- 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
@@ -74,7 +74,7 @@
 -- specify \"alt=csv\" as a query parameter.
 --
 -- /See:/ 'accountsReportsGenerate' smart constructor.
-data AccountsReportsGenerate = AccountsReportsGenerate
+data AccountsReportsGenerate = AccountsReportsGenerate'
     { _argDimension  :: !(Maybe [Text])
     , _argLocale     :: !(Maybe Text)
     , _argEndDate    :: !Text
@@ -116,7 +116,7 @@
     -> Text -- ^ 'argAccountId'
     -> AccountsReportsGenerate
 accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =
-    AccountsReportsGenerate
+    AccountsReportsGenerate'
     { _argDimension = Nothing
     , _argLocale = Nothing
     , _argEndDate = pArgEndDate_
@@ -196,7 +196,9 @@
 
 instance GoogleRequest AccountsReportsGenerate where
         type Rs AccountsReportsGenerate = Report
-        requestClient AccountsReportsGenerate{..}
+        type Scopes AccountsReportsGenerate =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AccountsReportsGenerate'{..}
           = go _argAccountId (Just _argStartDate)
               (Just _argEndDate)
               (_argDimension ^. _Default)
diff --git a/gen/Network/Google/Resource/AdSenseHost/AdClients/Get.hs b/gen/Network/Google/Resource/AdSenseHost/AdClients/Get.hs
--- a/gen/Network/Google/Resource/AdSenseHost/AdClients/Get.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/AdClients/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.AdClients.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
@@ -51,7 +51,7 @@
 -- | Get information about one of the ad clients in the Host AdSense account.
 --
 -- /See:/ 'adClientsGet' smart constructor.
-newtype AdClientsGet = AdClientsGet
+newtype AdClientsGet = AdClientsGet'
     { _acgAdClientId :: Text
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -64,7 +64,7 @@
     :: Text -- ^ 'acgAdClientId'
     -> AdClientsGet
 adClientsGet pAcgAdClientId_ =
-    AdClientsGet
+    AdClientsGet'
     { _acgAdClientId = pAcgAdClientId_
     }
 
@@ -76,7 +76,9 @@
 
 instance GoogleRequest AdClientsGet where
         type Rs AdClientsGet = AdClient
-        requestClient AdClientsGet{..}
+        type Scopes AdClientsGet =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AdClientsGet'{..}
           = go _acgAdClientId (Just AltJSON) adSenseHostService
           where go
                   = buildClient (Proxy :: Proxy AdClientsGetResource)
diff --git a/gen/Network/Google/Resource/AdSenseHost/AdClients/List.hs b/gen/Network/Google/Resource/AdSenseHost/AdClients/List.hs
--- a/gen/Network/Google/Resource/AdSenseHost/AdClients/List.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/AdClients/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.AdClients.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
@@ -53,7 +53,7 @@
 -- | List all host ad clients in this AdSense account.
 --
 -- /See:/ 'adClientsList' smart constructor.
-data AdClientsList = AdClientsList
+data AdClientsList = AdClientsList'
     { _aclPageToken  :: !(Maybe Text)
     , _aclMaxResults :: !(Maybe (Textual Word32))
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -68,7 +68,7 @@
 adClientsList
     :: AdClientsList
 adClientsList =
-    AdClientsList
+    AdClientsList'
     { _aclPageToken = Nothing
     , _aclMaxResults = Nothing
     }
@@ -90,7 +90,9 @@
 
 instance GoogleRequest AdClientsList where
         type Rs AdClientsList = AdClients
-        requestClient AdClientsList{..}
+        type Scopes AdClientsList =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AdClientsList'{..}
           = go _aclPageToken _aclMaxResults (Just AltJSON)
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Start.hs b/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Start.hs
--- a/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Start.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Start.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.AssociationSessions.Start
--- 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 @@
 -- AdSense user.
 --
 -- /See:/ 'associationSessionsStart' smart constructor.
-data AssociationSessionsStart = AssociationSessionsStart
+data AssociationSessionsStart = AssociationSessionsStart'
     { _assWebsiteLocale :: !(Maybe Text)
     , _assUserLocale    :: !(Maybe Text)
     , _assWebsiteURL    :: !Text
@@ -86,7 +86,7 @@
     -> [AssociationSessionsStartProductCode] -- ^ 'assProductCode'
     -> AssociationSessionsStart
 associationSessionsStart pAssWebsiteURL_ pAssProductCode_ =
-    AssociationSessionsStart
+    AssociationSessionsStart'
     { _assWebsiteLocale = Nothing
     , _assUserLocale = Nothing
     , _assWebsiteURL = pAssWebsiteURL_
@@ -120,7 +120,9 @@
 
 instance GoogleRequest AssociationSessionsStart where
         type Rs AssociationSessionsStart = AssociationSession
-        requestClient AssociationSessionsStart{..}
+        type Scopes AssociationSessionsStart =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AssociationSessionsStart'{..}
           = go _assProductCode (Just _assWebsiteURL)
               _assWebsiteLocale
               _assUserLocale
diff --git a/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Verify.hs b/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Verify.hs
--- a/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Verify.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Verify.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.AssociationSessions.Verify
--- 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 @@
 -- from AdSense signup.
 --
 -- /See:/ 'associationSessionsVerify' smart constructor.
-newtype AssociationSessionsVerify = AssociationSessionsVerify
+newtype AssociationSessionsVerify = AssociationSessionsVerify'
     { _asvToken :: Text
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -68,7 +68,7 @@
     :: Text -- ^ 'asvToken'
     -> AssociationSessionsVerify
 associationSessionsVerify pAsvToken_ =
-    AssociationSessionsVerify
+    AssociationSessionsVerify'
     { _asvToken = pAsvToken_
     }
 
@@ -80,7 +80,9 @@
          where
         type Rs AssociationSessionsVerify =
              AssociationSession
-        requestClient AssociationSessionsVerify{..}
+        type Scopes AssociationSessionsVerify =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient AssociationSessionsVerify'{..}
           = go (Just _asvToken) (Just AltJSON)
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Delete.hs b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Delete.hs
--- a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Delete.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Delete.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.CustomChannels.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 @@
 -- | Delete a specific custom channel from the host AdSense account.
 --
 -- /See:/ 'customChannelsDelete' smart constructor.
-data CustomChannelsDelete = CustomChannelsDelete
+data CustomChannelsDelete = CustomChannelsDelete'
     { _ccdCustomChannelId :: !Text
     , _ccdAdClientId      :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -72,7 +72,7 @@
     -> Text -- ^ 'ccdAdClientId'
     -> CustomChannelsDelete
 customChannelsDelete pCcdCustomChannelId_ pCcdAdClientId_ =
-    CustomChannelsDelete
+    CustomChannelsDelete'
     { _ccdCustomChannelId = pCcdCustomChannelId_
     , _ccdAdClientId = pCcdAdClientId_
     }
@@ -91,7 +91,9 @@
 
 instance GoogleRequest CustomChannelsDelete where
         type Rs CustomChannelsDelete = CustomChannel
-        requestClient CustomChannelsDelete{..}
+        type Scopes CustomChannelsDelete =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient CustomChannelsDelete'{..}
           = go _ccdAdClientId _ccdCustomChannelId
               (Just AltJSON)
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Get.hs b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Get.hs
--- a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Get.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Get.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.CustomChannels.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
@@ -54,7 +54,7 @@
 -- | Get a specific custom channel from the host AdSense account.
 --
 -- /See:/ 'customChannelsGet' smart constructor.
-data CustomChannelsGet = CustomChannelsGet
+data CustomChannelsGet = CustomChannelsGet'
     { _ccgCustomChannelId :: !Text
     , _ccgAdClientId      :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -71,7 +71,7 @@
     -> Text -- ^ 'ccgAdClientId'
     -> CustomChannelsGet
 customChannelsGet pCcgCustomChannelId_ pCcgAdClientId_ =
-    CustomChannelsGet
+    CustomChannelsGet'
     { _ccgCustomChannelId = pCcgCustomChannelId_
     , _ccgAdClientId = pCcgAdClientId_
     }
@@ -90,7 +90,9 @@
 
 instance GoogleRequest CustomChannelsGet where
         type Rs CustomChannelsGet = CustomChannel
-        requestClient CustomChannelsGet{..}
+        type Scopes CustomChannelsGet =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient CustomChannelsGet'{..}
           = go _ccgAdClientId _ccgCustomChannelId
               (Just AltJSON)
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Insert.hs b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Insert.hs
--- a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Insert.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Insert.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.CustomChannels.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
@@ -55,7 +55,7 @@
 -- | Add a new custom channel to the host AdSense account.
 --
 -- /See:/ 'customChannelsInsert' smart constructor.
-data CustomChannelsInsert = CustomChannelsInsert
+data CustomChannelsInsert = CustomChannelsInsert'
     { _cciPayload    :: !CustomChannel
     , _cciAdClientId :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -72,7 +72,7 @@
     -> Text -- ^ 'cciAdClientId'
     -> CustomChannelsInsert
 customChannelsInsert pCciPayload_ pCciAdClientId_ =
-    CustomChannelsInsert
+    CustomChannelsInsert'
     { _cciPayload = pCciPayload_
     , _cciAdClientId = pCciAdClientId_
     }
@@ -90,7 +90,9 @@
 
 instance GoogleRequest CustomChannelsInsert where
         type Rs CustomChannelsInsert = CustomChannel
-        requestClient CustomChannelsInsert{..}
+        type Scopes CustomChannelsInsert =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient CustomChannelsInsert'{..}
           = go _cciAdClientId (Just AltJSON) _cciPayload
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/List.hs b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/List.hs
--- a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/List.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.CustomChannels.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
@@ -57,7 +57,7 @@
 -- | List all host custom channels in this AdSense account.
 --
 -- /See:/ 'customChannelsList' smart constructor.
-data CustomChannelsList = CustomChannelsList
+data CustomChannelsList = CustomChannelsList'
     { _cclAdClientId :: !Text
     , _cclPageToken  :: !(Maybe Text)
     , _cclMaxResults :: !(Maybe (Textual Word32))
@@ -76,7 +76,7 @@
     :: Text -- ^ 'cclAdClientId'
     -> CustomChannelsList
 customChannelsList pCclAdClientId_ =
-    CustomChannelsList
+    CustomChannelsList'
     { _cclAdClientId = pCclAdClientId_
     , _cclPageToken = Nothing
     , _cclMaxResults = Nothing
@@ -105,7 +105,9 @@
 
 instance GoogleRequest CustomChannelsList where
         type Rs CustomChannelsList = CustomChannels
-        requestClient CustomChannelsList{..}
+        type Scopes CustomChannelsList =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient CustomChannelsList'{..}
           = go _cclAdClientId _cclPageToken _cclMaxResults
               (Just AltJSON)
               adSenseHostService
diff --git a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs
--- a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.CustomChannels.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
@@ -59,7 +59,7 @@
 -- supports patch semantics.
 --
 -- /See:/ 'customChannelsPatch' smart constructor.
-data CustomChannelsPatch = CustomChannelsPatch
+data CustomChannelsPatch = CustomChannelsPatch'
     { _ccpCustomChannelId :: !Text
     , _ccpPayload         :: !CustomChannel
     , _ccpAdClientId      :: !Text
@@ -80,7 +80,7 @@
     -> Text -- ^ 'ccpAdClientId'
     -> CustomChannelsPatch
 customChannelsPatch pCcpCustomChannelId_ pCcpPayload_ pCcpAdClientId_ =
-    CustomChannelsPatch
+    CustomChannelsPatch'
     { _ccpCustomChannelId = pCcpCustomChannelId_
     , _ccpPayload = pCcpPayload_
     , _ccpAdClientId = pCcpAdClientId_
@@ -105,7 +105,9 @@
 
 instance GoogleRequest CustomChannelsPatch where
         type Rs CustomChannelsPatch = CustomChannel
-        requestClient CustomChannelsPatch{..}
+        type Scopes CustomChannelsPatch =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient CustomChannelsPatch'{..}
           = go _ccpAdClientId (Just _ccpCustomChannelId)
               (Just AltJSON)
               _ccpPayload
diff --git a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs
--- a/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.CustomChannels.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
@@ -55,7 +55,7 @@
 -- | Update a custom channel in the host AdSense account.
 --
 -- /See:/ 'customChannelsUpdate' smart constructor.
-data CustomChannelsUpdate = CustomChannelsUpdate
+data CustomChannelsUpdate = CustomChannelsUpdate'
     { _ccuPayload    :: !CustomChannel
     , _ccuAdClientId :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -72,7 +72,7 @@
     -> Text -- ^ 'ccuAdClientId'
     -> CustomChannelsUpdate
 customChannelsUpdate pCcuPayload_ pCcuAdClientId_ =
-    CustomChannelsUpdate
+    CustomChannelsUpdate'
     { _ccuPayload = pCcuPayload_
     , _ccuAdClientId = pCcuAdClientId_
     }
@@ -90,7 +90,9 @@
 
 instance GoogleRequest CustomChannelsUpdate where
         type Rs CustomChannelsUpdate = CustomChannel
-        requestClient CustomChannelsUpdate{..}
+        type Scopes CustomChannelsUpdate =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient CustomChannelsUpdate'{..}
           = go _ccuAdClientId (Just AltJSON) _ccuPayload
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/Reports/Generate.hs b/gen/Network/Google/Resource/AdSenseHost/Reports/Generate.hs
--- a/gen/Network/Google/Resource/AdSenseHost/Reports/Generate.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/Reports/Generate.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.Reports.Generate
--- 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
@@ -71,7 +71,7 @@
 -- specify \"alt=csv\" as a query parameter.
 --
 -- /See:/ 'reportsGenerate' smart constructor.
-data ReportsGenerate = ReportsGenerate
+data ReportsGenerate = ReportsGenerate'
     { _rgDimension  :: !(Maybe [Text])
     , _rgLocale     :: !(Maybe Text)
     , _rgEndDate    :: !Text
@@ -109,7 +109,7 @@
     -> Text -- ^ 'rgStartDate'
     -> ReportsGenerate
 reportsGenerate pRgEndDate_ pRgStartDate_ =
-    ReportsGenerate
+    ReportsGenerate'
     { _rgDimension = Nothing
     , _rgLocale = Nothing
     , _rgEndDate = pRgEndDate_
@@ -180,7 +180,9 @@
 
 instance GoogleRequest ReportsGenerate where
         type Rs ReportsGenerate = Report
-        requestClient ReportsGenerate{..}
+        type Scopes ReportsGenerate =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient ReportsGenerate'{..}
           = go (Just _rgStartDate) (Just _rgEndDate)
               (_rgDimension ^. _Default)
               _rgLocale
diff --git a/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs b/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs
--- a/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.URLChannels.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
@@ -54,7 +54,7 @@
 -- | Delete a URL channel from the host AdSense account.
 --
 -- /See:/ 'urlChannelsDelete' smart constructor.
-data URLChannelsDelete = URLChannelsDelete
+data URLChannelsDelete = URLChannelsDelete'
     { _ucdURLChannelId :: !Text
     , _ucdAdClientId   :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -71,7 +71,7 @@
     -> Text -- ^ 'ucdAdClientId'
     -> URLChannelsDelete
 urlChannelsDelete pUcdURLChannelId_ pUcdAdClientId_ =
-    URLChannelsDelete
+    URLChannelsDelete'
     { _ucdURLChannelId = pUcdURLChannelId_
     , _ucdAdClientId = pUcdAdClientId_
     }
@@ -90,7 +90,9 @@
 
 instance GoogleRequest URLChannelsDelete where
         type Rs URLChannelsDelete = URLChannel
-        requestClient URLChannelsDelete{..}
+        type Scopes URLChannelsDelete =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient URLChannelsDelete'{..}
           = go _ucdAdClientId _ucdURLChannelId (Just AltJSON)
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs b/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs
--- a/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.URLChannels.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
@@ -54,7 +54,7 @@
 -- | Add a new URL channel to the host AdSense account.
 --
 -- /See:/ 'urlChannelsInsert' smart constructor.
-data URLChannelsInsert = URLChannelsInsert
+data URLChannelsInsert = URLChannelsInsert'
     { _uciPayload    :: !URLChannel
     , _uciAdClientId :: !Text
     } deriving (Eq,Show,Data,Typeable,Generic)
@@ -71,7 +71,7 @@
     -> Text -- ^ 'uciAdClientId'
     -> URLChannelsInsert
 urlChannelsInsert pUciPayload_ pUciAdClientId_ =
-    URLChannelsInsert
+    URLChannelsInsert'
     { _uciPayload = pUciPayload_
     , _uciAdClientId = pUciAdClientId_
     }
@@ -89,7 +89,9 @@
 
 instance GoogleRequest URLChannelsInsert where
         type Rs URLChannelsInsert = URLChannel
-        requestClient URLChannelsInsert{..}
+        type Scopes URLChannelsInsert =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient URLChannelsInsert'{..}
           = go _uciAdClientId (Just AltJSON) _uciPayload
               adSenseHostService
           where go
diff --git a/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs b/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs
--- a/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs
+++ b/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs
@@ -14,7 +14,7 @@
 
 -- |
 -- Module      : Network.Google.Resource.AdSenseHost.URLChannels.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
@@ -56,7 +56,7 @@
 -- | List all host URL channels in the host AdSense account.
 --
 -- /See:/ 'urlChannelsList' smart constructor.
-data URLChannelsList = URLChannelsList
+data URLChannelsList = URLChannelsList'
     { _uclAdClientId :: !Text
     , _uclPageToken  :: !(Maybe Text)
     , _uclMaxResults :: !(Maybe (Textual Word32))
@@ -75,7 +75,7 @@
     :: Text -- ^ 'uclAdClientId'
     -> URLChannelsList
 urlChannelsList pUclAdClientId_ =
-    URLChannelsList
+    URLChannelsList'
     { _uclAdClientId = pUclAdClientId_
     , _uclPageToken = Nothing
     , _uclMaxResults = Nothing
@@ -104,7 +104,9 @@
 
 instance GoogleRequest URLChannelsList where
         type Rs URLChannelsList = URLChannels
-        requestClient URLChannelsList{..}
+        type Scopes URLChannelsList =
+             '["https://www.googleapis.com/auth/adsensehost"]
+        requestClient URLChannelsList'{..}
           = go _uclAdClientId _uclPageToken _uclMaxResults
               (Just AltJSON)
               adSenseHostService
diff --git a/gogol-adsense-host.cabal b/gogol-adsense-host.cabal
--- a/gogol-adsense-host.cabal
+++ b/gogol-adsense-host.cabal
@@ -1,5 +1,5 @@
 name:                  gogol-adsense-host
-version:               0.0.1
+version:               0.1.0
 synopsis:              Google AdSense Host 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:
-    Gives AdSense Hosts access to report generation, ad code generation, and
-    publisher management capabilities.
+    Generates performance reports, generates ad codes, and provides
+    publisher management capabilities for AdSense Hosts.
     .
     /Warning:/ This is an experimental prototype/preview release which is still
     under exploratory development and not intended for public use, caveat emptor!
@@ -72,5 +72,5 @@
         , Network.Google.AdSenseHost.Types.Sum
 
     build-depends:
-          gogol-core == 0.0.1.*
+          gogol-core == 0.1.0.*
         , base       >= 4.7 && < 5