{-# 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.Mirror.Timeline.Delete
(
TimelineDeleteResource
, timelineDelete
, TimelineDelete
, tdId
) where
import Network.Google.Mirror.Types
import Network.Google.Prelude
type TimelineDeleteResource =
"mirror" :>
"v1" :>
"timeline" :>
Capture "id" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] ()
newtype TimelineDelete = TimelineDelete'
{ _tdId :: Text
} deriving (Eq,Show,Data,Typeable,Generic)
timelineDelete
:: Text
-> TimelineDelete
timelineDelete pTdId_ =
TimelineDelete'
{ _tdId = pTdId_
}
tdId :: Lens' TimelineDelete Text
tdId = lens _tdId (\ s a -> s{_tdId = a})
instance GoogleRequest TimelineDelete where
type Rs TimelineDelete = ()
type Scopes TimelineDelete =
'["https://www.googleapis.com/auth/glass.location",
"https://www.googleapis.com/auth/glass.timeline"]
requestClient TimelineDelete'{..}
= go _tdId (Just AltJSON) mirrorService
where go
= buildClient (Proxy :: Proxy TimelineDeleteResource)
mempty