{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.ApiGatewayV2.DeleteIntegrationResponse
(
DeleteIntegrationResponse (..),
newDeleteIntegrationResponse,
deleteIntegrationResponse_apiId,
deleteIntegrationResponse_integrationResponseId,
deleteIntegrationResponse_integrationId,
DeleteIntegrationResponseResponse (..),
newDeleteIntegrationResponseResponse,
)
where
import Amazonka.ApiGatewayV2.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DeleteIntegrationResponse = DeleteIntegrationResponse'
{
DeleteIntegrationResponse -> Text
apiId :: Prelude.Text,
DeleteIntegrationResponse -> Text
integrationResponseId :: Prelude.Text,
DeleteIntegrationResponse -> Text
integrationId :: Prelude.Text
}
deriving (DeleteIntegrationResponse -> DeleteIntegrationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteIntegrationResponse -> DeleteIntegrationResponse -> Bool
$c/= :: DeleteIntegrationResponse -> DeleteIntegrationResponse -> Bool
== :: DeleteIntegrationResponse -> DeleteIntegrationResponse -> Bool
$c== :: DeleteIntegrationResponse -> DeleteIntegrationResponse -> Bool
Prelude.Eq, ReadPrec [DeleteIntegrationResponse]
ReadPrec DeleteIntegrationResponse
Int -> ReadS DeleteIntegrationResponse
ReadS [DeleteIntegrationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteIntegrationResponse]
$creadListPrec :: ReadPrec [DeleteIntegrationResponse]
readPrec :: ReadPrec DeleteIntegrationResponse
$creadPrec :: ReadPrec DeleteIntegrationResponse
readList :: ReadS [DeleteIntegrationResponse]
$creadList :: ReadS [DeleteIntegrationResponse]
readsPrec :: Int -> ReadS DeleteIntegrationResponse
$creadsPrec :: Int -> ReadS DeleteIntegrationResponse
Prelude.Read, Int -> DeleteIntegrationResponse -> ShowS
[DeleteIntegrationResponse] -> ShowS
DeleteIntegrationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteIntegrationResponse] -> ShowS
$cshowList :: [DeleteIntegrationResponse] -> ShowS
show :: DeleteIntegrationResponse -> String
$cshow :: DeleteIntegrationResponse -> String
showsPrec :: Int -> DeleteIntegrationResponse -> ShowS
$cshowsPrec :: Int -> DeleteIntegrationResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteIntegrationResponse x -> DeleteIntegrationResponse
forall x.
DeleteIntegrationResponse -> Rep DeleteIntegrationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteIntegrationResponse x -> DeleteIntegrationResponse
$cfrom :: forall x.
DeleteIntegrationResponse -> Rep DeleteIntegrationResponse x
Prelude.Generic)
newDeleteIntegrationResponse ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
DeleteIntegrationResponse
newDeleteIntegrationResponse :: Text -> Text -> Text -> DeleteIntegrationResponse
newDeleteIntegrationResponse
Text
pApiId_
Text
pIntegrationResponseId_
Text
pIntegrationId_ =
DeleteIntegrationResponse'
{ $sel:apiId:DeleteIntegrationResponse' :: Text
apiId = Text
pApiId_,
$sel:integrationResponseId:DeleteIntegrationResponse' :: Text
integrationResponseId = Text
pIntegrationResponseId_,
$sel:integrationId:DeleteIntegrationResponse' :: Text
integrationId = Text
pIntegrationId_
}
deleteIntegrationResponse_apiId :: Lens.Lens' DeleteIntegrationResponse Prelude.Text
deleteIntegrationResponse_apiId :: Lens' DeleteIntegrationResponse Text
deleteIntegrationResponse_apiId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteIntegrationResponse' {Text
apiId :: Text
$sel:apiId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
apiId} -> Text
apiId) (\s :: DeleteIntegrationResponse
s@DeleteIntegrationResponse' {} Text
a -> DeleteIntegrationResponse
s {$sel:apiId:DeleteIntegrationResponse' :: Text
apiId = Text
a} :: DeleteIntegrationResponse)
deleteIntegrationResponse_integrationResponseId :: Lens.Lens' DeleteIntegrationResponse Prelude.Text
deleteIntegrationResponse_integrationResponseId :: Lens' DeleteIntegrationResponse Text
deleteIntegrationResponse_integrationResponseId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteIntegrationResponse' {Text
integrationResponseId :: Text
$sel:integrationResponseId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
integrationResponseId} -> Text
integrationResponseId) (\s :: DeleteIntegrationResponse
s@DeleteIntegrationResponse' {} Text
a -> DeleteIntegrationResponse
s {$sel:integrationResponseId:DeleteIntegrationResponse' :: Text
integrationResponseId = Text
a} :: DeleteIntegrationResponse)
deleteIntegrationResponse_integrationId :: Lens.Lens' DeleteIntegrationResponse Prelude.Text
deleteIntegrationResponse_integrationId :: Lens' DeleteIntegrationResponse Text
deleteIntegrationResponse_integrationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteIntegrationResponse' {Text
integrationId :: Text
$sel:integrationId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
integrationId} -> Text
integrationId) (\s :: DeleteIntegrationResponse
s@DeleteIntegrationResponse' {} Text
a -> DeleteIntegrationResponse
s {$sel:integrationId:DeleteIntegrationResponse' :: Text
integrationId = Text
a} :: DeleteIntegrationResponse)
instance Core.AWSRequest DeleteIntegrationResponse where
type
AWSResponse DeleteIntegrationResponse =
DeleteIntegrationResponseResponse
request :: (Service -> Service)
-> DeleteIntegrationResponse -> Request DeleteIntegrationResponse
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.delete (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DeleteIntegrationResponse
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DeleteIntegrationResponse)))
response =
forall (m :: * -> *) a.
MonadResource m =>
AWSResponse a
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveNull
DeleteIntegrationResponseResponse
DeleteIntegrationResponseResponse'
instance Prelude.Hashable DeleteIntegrationResponse where
hashWithSalt :: Int -> DeleteIntegrationResponse -> Int
hashWithSalt Int
_salt DeleteIntegrationResponse' {Text
integrationId :: Text
integrationResponseId :: Text
apiId :: Text
$sel:integrationId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
$sel:integrationResponseId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
$sel:apiId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
apiId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
integrationResponseId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
integrationId
instance Prelude.NFData DeleteIntegrationResponse where
rnf :: DeleteIntegrationResponse -> ()
rnf DeleteIntegrationResponse' {Text
integrationId :: Text
integrationResponseId :: Text
apiId :: Text
$sel:integrationId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
$sel:integrationResponseId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
$sel:apiId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
apiId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
integrationResponseId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
integrationId
instance Data.ToHeaders DeleteIntegrationResponse where
toHeaders :: DeleteIntegrationResponse -> [Header]
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> [Header]
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToPath DeleteIntegrationResponse where
toPath :: DeleteIntegrationResponse -> ByteString
toPath DeleteIntegrationResponse' {Text
integrationId :: Text
integrationResponseId :: Text
apiId :: Text
$sel:integrationId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
$sel:integrationResponseId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
$sel:apiId:DeleteIntegrationResponse' :: DeleteIntegrationResponse -> Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/v2/apis/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
apiId,
ByteString
"/integrations/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
integrationId,
ByteString
"/integrationresponses/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
integrationResponseId
]
instance Data.ToQuery DeleteIntegrationResponse where
toQuery :: DeleteIntegrationResponse -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DeleteIntegrationResponseResponse = DeleteIntegrationResponseResponse'
{
}
deriving (DeleteIntegrationResponseResponse
-> DeleteIntegrationResponseResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteIntegrationResponseResponse
-> DeleteIntegrationResponseResponse -> Bool
$c/= :: DeleteIntegrationResponseResponse
-> DeleteIntegrationResponseResponse -> Bool
== :: DeleteIntegrationResponseResponse
-> DeleteIntegrationResponseResponse -> Bool
$c== :: DeleteIntegrationResponseResponse
-> DeleteIntegrationResponseResponse -> Bool
Prelude.Eq, ReadPrec [DeleteIntegrationResponseResponse]
ReadPrec DeleteIntegrationResponseResponse
Int -> ReadS DeleteIntegrationResponseResponse
ReadS [DeleteIntegrationResponseResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteIntegrationResponseResponse]
$creadListPrec :: ReadPrec [DeleteIntegrationResponseResponse]
readPrec :: ReadPrec DeleteIntegrationResponseResponse
$creadPrec :: ReadPrec DeleteIntegrationResponseResponse
readList :: ReadS [DeleteIntegrationResponseResponse]
$creadList :: ReadS [DeleteIntegrationResponseResponse]
readsPrec :: Int -> ReadS DeleteIntegrationResponseResponse
$creadsPrec :: Int -> ReadS DeleteIntegrationResponseResponse
Prelude.Read, Int -> DeleteIntegrationResponseResponse -> ShowS
[DeleteIntegrationResponseResponse] -> ShowS
DeleteIntegrationResponseResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteIntegrationResponseResponse] -> ShowS
$cshowList :: [DeleteIntegrationResponseResponse] -> ShowS
show :: DeleteIntegrationResponseResponse -> String
$cshow :: DeleteIntegrationResponseResponse -> String
showsPrec :: Int -> DeleteIntegrationResponseResponse -> ShowS
$cshowsPrec :: Int -> DeleteIntegrationResponseResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteIntegrationResponseResponse x
-> DeleteIntegrationResponseResponse
forall x.
DeleteIntegrationResponseResponse
-> Rep DeleteIntegrationResponseResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteIntegrationResponseResponse x
-> DeleteIntegrationResponseResponse
$cfrom :: forall x.
DeleteIntegrationResponseResponse
-> Rep DeleteIntegrationResponseResponse x
Prelude.Generic)
newDeleteIntegrationResponseResponse ::
DeleteIntegrationResponseResponse
newDeleteIntegrationResponseResponse :: DeleteIntegrationResponseResponse
newDeleteIntegrationResponseResponse =
DeleteIntegrationResponseResponse
DeleteIntegrationResponseResponse'
instance
Prelude.NFData
DeleteIntegrationResponseResponse
where
rnf :: DeleteIntegrationResponseResponse -> ()
rnf DeleteIntegrationResponseResponse
_ = ()