module Network.Google.Resource.MapsEngine.Tables.Features.Get
(
TablesFeaturesGetResource
, tablesFeaturesGet
, TablesFeaturesGet
, tfgVersion
, tfgId
, tfgSelect
, tfgTableId
) where
import Network.Google.MapsEngine.Types
import Network.Google.Prelude
type TablesFeaturesGetResource =
"mapsengine" :>
"v1" :>
"tables" :>
Capture "tableId" Text :>
"features" :>
Capture "id" Text :>
QueryParam "version" TablesFeaturesGetVersion :>
QueryParam "select" Text :>
QueryParam "alt" AltJSON :> Get '[JSON] Feature
data TablesFeaturesGet = TablesFeaturesGet'
{ _tfgVersion :: !(Maybe TablesFeaturesGetVersion)
, _tfgId :: !Text
, _tfgSelect :: !(Maybe Text)
, _tfgTableId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
tablesFeaturesGet
:: Text
-> Text
-> TablesFeaturesGet
tablesFeaturesGet pTfgId_ pTfgTableId_ =
TablesFeaturesGet'
{ _tfgVersion = Nothing
, _tfgId = pTfgId_
, _tfgSelect = Nothing
, _tfgTableId = pTfgTableId_
}
tfgVersion :: Lens' TablesFeaturesGet (Maybe TablesFeaturesGetVersion)
tfgVersion
= lens _tfgVersion (\ s a -> s{_tfgVersion = a})
tfgId :: Lens' TablesFeaturesGet Text
tfgId = lens _tfgId (\ s a -> s{_tfgId = a})
tfgSelect :: Lens' TablesFeaturesGet (Maybe Text)
tfgSelect
= lens _tfgSelect (\ s a -> s{_tfgSelect = a})
tfgTableId :: Lens' TablesFeaturesGet Text
tfgTableId
= lens _tfgTableId (\ s a -> s{_tfgTableId = a})
instance GoogleRequest TablesFeaturesGet where
type Rs TablesFeaturesGet = Feature
type Scopes TablesFeaturesGet =
'["https://www.googleapis.com/auth/mapsengine",
"https://www.googleapis.com/auth/mapsengine.readonly"]
requestClient TablesFeaturesGet'{..}
= go _tfgTableId _tfgId _tfgVersion _tfgSelect
(Just AltJSON)
mapsEngineService
where go
= buildClient
(Proxy :: Proxy TablesFeaturesGetResource)
mempty