gogol-adsense 0.3.0 → 0.4.0

raw patch · 6 files changed

+144/−7 lines, 6 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

• gen/Network/Google/AdSense.hs +7/−0
• gen/Network/Google/AdSense/Types.hs +2/−0
• gen/Network/Google/AdSense/Types/Product.hs +26/−4
• gen/Network/Google/AdSense/Types/Sum.hs +1/−1
• gen/Network/Google/Resource/AdSense/Accounts/AdClients/GetAdCode.hs +105/−0
• gogol-adsense.cabal +3/−2

@@ -31,6 +31,9 @@      -- * Resources +    -- ** adsense.accounts.adclients.getAdCode+    , module Network.Google.Resource.AdSense.Accounts.AdClients.GetAdCode+     -- ** adsense.accounts.adclients.list     , module Network.Google.Resource.AdSense.Accounts.AdClients.List @@ -375,6 +378,8 @@     , AdCode     , adCode     , addKind+    , addAmpHead+    , addAmpBody     , addAdCode      -- ** AdsenseReportsGenerateResponse@@ -406,6 +411,7 @@  import           Network.Google.AdSense.Types import           Network.Google.Prelude+import           Network.Google.Resource.AdSense.Accounts.AdClients.GetAdCode import           Network.Google.Resource.AdSense.Accounts.AdClients.List import           Network.Google.Resource.AdSense.Accounts.AdUnits.CustomChannels.List import           Network.Google.Resource.AdSense.Accounts.AdUnits.Get@@ -453,6 +459,7 @@ type AdSenseAPI =      AdClientsListResource :<|>        AccountsAdClientsListResource+       :<|> AccountsAdClientsGetAdCodeResource        :<|> AccountsReportsSavedListResource        :<|> AccountsReportsSavedGenerateResource        :<|> AccountsReportsGenerateResource

@@ -251,6 +251,8 @@     , AdCode     , adCode     , addKind+    , addAmpHead+    , addAmpBody     , addAdCode      -- * AdsenseReportsGenerateResponse

@@ -2017,8 +2017,10 @@ -- -- /See:/ 'adCode' smart constructor. data AdCode = AdCode'-    { _addKind   :: !Text-    , _addAdCode :: !(Maybe Text)+    { _addKind    :: !Text+    , _addAmpHead :: !(Maybe Text)+    , _addAmpBody :: !(Maybe Text)+    , _addAdCode  :: !(Maybe Text)     } deriving (Eq,Show,Data,Typeable,Generic)  -- | Creates a value of 'AdCode' with the minimum fields required to make a request.@@ -2027,12 +2029,18 @@ -- -- * 'addKind' --+-- * 'addAmpHead'+--+-- * 'addAmpBody'+-- -- * 'addAdCode' adCode     :: AdCode adCode =     AdCode'     { _addKind = "adsense#adCode"+    , _addAmpHead = Nothing+    , _addAmpBody = Nothing     , _addAdCode = Nothing     } @@ -2040,7 +2048,17 @@ addKind :: Lens' AdCode Text addKind = lens _addKind (\ s a -> s{_addKind = a}) --- | The ad code snippet.+-- | The AMP Auto ad code snippet that goes in the head of an AMP page.+addAmpHead :: Lens' AdCode (Maybe Text)+addAmpHead+  = lens _addAmpHead (\ s a -> s{_addAmpHead = a})++-- | The AMP Auto ad code snippet that goes in the body of an AMP page.+addAmpBody :: Lens' AdCode (Maybe Text)+addAmpBody+  = lens _addAmpBody (\ s a -> s{_addAmpBody = a})++-- | The Auto ad code snippet. The ad code snippet. addAdCode :: Lens' AdCode (Maybe Text) addAdCode   = lens _addAdCode (\ s a -> s{_addAdCode = a})@@ -2051,13 +2069,17 @@               (\ o ->                  AdCode' <$>                    (o .:? "kind" .!= "adsense#adCode") <*>-                     (o .:? "adCode"))+                     (o .:? "ampHead")+                     <*> (o .:? "ampBody")+                     <*> (o .:? "adCode"))  instance ToJSON AdCode where         toJSON AdCode'{..}           = object               (catMaybes                  [Just ("kind" .= _addKind),+                  ("ampHead" .=) <$> _addAmpHead,+                  ("ampBody" .=) <$> _addAmpBody,                   ("adCode" .=) <$> _addAdCode])  --

@@ -16,4 +16,4 @@ -- module Network.Google.AdSense.Types.Sum where -import           Network.Google.Prelude+import           Network.Google.Prelude hiding (Bytes)

@@ -0,0 +1,105 @@+{-# LANGUAGE DataKinds          #-}+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE FlexibleInstances  #-}+{-# LANGUAGE NoImplicitPrelude  #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}+{-# LANGUAGE TypeOperators      #-}++{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds      #-}+{-# OPTIONS_GHC -fno-warn-unused-imports    #-}++-- |+-- Module      : Network.Google.Resource.AdSense.Accounts.AdClients.GetAdCode+-- 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)+--+-- Get Auto ad code for a given ad client.+--+-- /See:/ <https://developers.google.com/adsense/management/ AdSense Management API Reference> for @adsense.accounts.adclients.getAdCode@.+module Network.Google.Resource.AdSense.Accounts.AdClients.GetAdCode+    (+    -- * REST Resource+      AccountsAdClientsGetAdCodeResource++    -- * Creating a Request+    , accountsAdClientsGetAdCode+    , AccountsAdClientsGetAdCode++    -- * Request Lenses+    , aacgacAdClientId+    , aacgacAccountId+    ) where++import           Network.Google.AdSense.Types+import           Network.Google.Prelude++-- | A resource alias for @adsense.accounts.adclients.getAdCode@ method which the+-- 'AccountsAdClientsGetAdCode' request conforms to.+type AccountsAdClientsGetAdCodeResource =+     "adsense" :>+       "v1.4" :>+         "accounts" :>+           Capture "accountId" Text :>+             "adclients" :>+               Capture "adClientId" Text :>+                 "adcode" :>+                   QueryParam "alt" AltJSON :> Get '[JSON] AdCode++-- | Get Auto ad code for a given ad client.+--+-- /See:/ 'accountsAdClientsGetAdCode' smart constructor.+data AccountsAdClientsGetAdCode = AccountsAdClientsGetAdCode'+    { _aacgacAdClientId :: !Text+    , _aacgacAccountId  :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountsAdClientsGetAdCode' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aacgacAdClientId'+--+-- * 'aacgacAccountId'+accountsAdClientsGetAdCode+    :: Text -- ^ 'aacgacAdClientId'+    -> Text -- ^ 'aacgacAccountId'+    -> AccountsAdClientsGetAdCode+accountsAdClientsGetAdCode pAacgacAdClientId_ pAacgacAccountId_ =+    AccountsAdClientsGetAdCode'+    { _aacgacAdClientId = pAacgacAdClientId_+    , _aacgacAccountId = pAacgacAccountId_+    }++-- | Ad client to get the code for.+aacgacAdClientId :: Lens' AccountsAdClientsGetAdCode Text+aacgacAdClientId+  = lens _aacgacAdClientId+      (\ s a -> s{_aacgacAdClientId = a})++-- | Account which contains the ad client.+aacgacAccountId :: Lens' AccountsAdClientsGetAdCode Text+aacgacAccountId+  = lens _aacgacAccountId+      (\ s a -> s{_aacgacAccountId = a})++instance GoogleRequest AccountsAdClientsGetAdCode+         where+        type Rs AccountsAdClientsGetAdCode = AdCode+        type Scopes AccountsAdClientsGetAdCode =+             '["https://www.googleapis.com/auth/adsense",+               "https://www.googleapis.com/auth/adsense.readonly"]+        requestClient AccountsAdClientsGetAdCode'{..}+          = go _aacgacAccountId _aacgacAdClientId+              (Just AltJSON)+              adSenseService+          where go+                  = buildClient+                      (Proxy :: Proxy AccountsAdClientsGetAdCodeResource)+                      mempty

@@ -1,5 +1,5 @@ name:                  gogol-adsense-version:               0.3.0+version:               0.4.0 synopsis:              Google AdSense Management SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -36,6 +36,7 @@     exposed-modules:           Network.Google.AdSense         , Network.Google.AdSense.Types+        , Network.Google.Resource.AdSense.Accounts.AdClients.GetAdCode         , Network.Google.Resource.AdSense.Accounts.AdClients.List         , Network.Google.Resource.AdSense.Accounts.AdUnits.CustomChannels.List         , Network.Google.Resource.AdSense.Accounts.AdUnits.Get@@ -80,5 +81,5 @@         , Network.Google.AdSense.Types.Sum      build-depends:-          gogol-core == 0.3.0.*+          gogol-core == 0.4.0.*         , base       >= 4.7 && < 5