module Network.Google.Resource.Classroom.Invitations.Delete
(
InvitationsDeleteResource
, invitationsDelete
, InvitationsDelete
, idXgafv
, idUploadProtocol
, idPp
, idAccessToken
, idUploadType
, idBearerToken
, idId
, idCallback
) where
import Network.Google.Classroom.Types
import Network.Google.Prelude
type InvitationsDeleteResource =
"v1" :>
"invitations" :>
Capture "id" Text :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] Empty
data InvitationsDelete = InvitationsDelete
{ _idXgafv :: !(Maybe Text)
, _idUploadProtocol :: !(Maybe Text)
, _idPp :: !Bool
, _idAccessToken :: !(Maybe Text)
, _idUploadType :: !(Maybe Text)
, _idBearerToken :: !(Maybe Text)
, _idId :: !Text
, _idCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
invitationsDelete
:: Text
-> InvitationsDelete
invitationsDelete pIdId_ =
InvitationsDelete
{ _idXgafv = Nothing
, _idUploadProtocol = Nothing
, _idPp = True
, _idAccessToken = Nothing
, _idUploadType = Nothing
, _idBearerToken = Nothing
, _idId = pIdId_
, _idCallback = Nothing
}
idXgafv :: Lens' InvitationsDelete (Maybe Text)
idXgafv = lens _idXgafv (\ s a -> s{_idXgafv = a})
idUploadProtocol :: Lens' InvitationsDelete (Maybe Text)
idUploadProtocol
= lens _idUploadProtocol
(\ s a -> s{_idUploadProtocol = a})
idPp :: Lens' InvitationsDelete Bool
idPp = lens _idPp (\ s a -> s{_idPp = a})
idAccessToken :: Lens' InvitationsDelete (Maybe Text)
idAccessToken
= lens _idAccessToken
(\ s a -> s{_idAccessToken = a})
idUploadType :: Lens' InvitationsDelete (Maybe Text)
idUploadType
= lens _idUploadType (\ s a -> s{_idUploadType = a})
idBearerToken :: Lens' InvitationsDelete (Maybe Text)
idBearerToken
= lens _idBearerToken
(\ s a -> s{_idBearerToken = a})
idId :: Lens' InvitationsDelete Text
idId = lens _idId (\ s a -> s{_idId = a})
idCallback :: Lens' InvitationsDelete (Maybe Text)
idCallback
= lens _idCallback (\ s a -> s{_idCallback = a})
instance GoogleRequest InvitationsDelete where
type Rs InvitationsDelete = Empty
requestClient InvitationsDelete{..}
= go _idId _idXgafv _idUploadProtocol (Just _idPp)
_idAccessToken
_idUploadType
_idBearerToken
_idCallback
(Just AltJSON)
classroomService
where go
= buildClient
(Proxy :: Proxy InvitationsDeleteResource)
mempty