{-# 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.ChimeSdkVoice.DeleteVoiceConnectorTermination
(
DeleteVoiceConnectorTermination (..),
newDeleteVoiceConnectorTermination,
deleteVoiceConnectorTermination_voiceConnectorId,
DeleteVoiceConnectorTerminationResponse (..),
newDeleteVoiceConnectorTerminationResponse,
)
where
import Amazonka.ChimeSdkVoice.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 DeleteVoiceConnectorTermination = DeleteVoiceConnectorTermination'
{ DeleteVoiceConnectorTermination -> Text
voiceConnectorId :: Prelude.Text
}
deriving (DeleteVoiceConnectorTermination
-> DeleteVoiceConnectorTermination -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteVoiceConnectorTermination
-> DeleteVoiceConnectorTermination -> Bool
$c/= :: DeleteVoiceConnectorTermination
-> DeleteVoiceConnectorTermination -> Bool
== :: DeleteVoiceConnectorTermination
-> DeleteVoiceConnectorTermination -> Bool
$c== :: DeleteVoiceConnectorTermination
-> DeleteVoiceConnectorTermination -> Bool
Prelude.Eq, ReadPrec [DeleteVoiceConnectorTermination]
ReadPrec DeleteVoiceConnectorTermination
Int -> ReadS DeleteVoiceConnectorTermination
ReadS [DeleteVoiceConnectorTermination]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteVoiceConnectorTermination]
$creadListPrec :: ReadPrec [DeleteVoiceConnectorTermination]
readPrec :: ReadPrec DeleteVoiceConnectorTermination
$creadPrec :: ReadPrec DeleteVoiceConnectorTermination
readList :: ReadS [DeleteVoiceConnectorTermination]
$creadList :: ReadS [DeleteVoiceConnectorTermination]
readsPrec :: Int -> ReadS DeleteVoiceConnectorTermination
$creadsPrec :: Int -> ReadS DeleteVoiceConnectorTermination
Prelude.Read, Int -> DeleteVoiceConnectorTermination -> ShowS
[DeleteVoiceConnectorTermination] -> ShowS
DeleteVoiceConnectorTermination -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteVoiceConnectorTermination] -> ShowS
$cshowList :: [DeleteVoiceConnectorTermination] -> ShowS
show :: DeleteVoiceConnectorTermination -> String
$cshow :: DeleteVoiceConnectorTermination -> String
showsPrec :: Int -> DeleteVoiceConnectorTermination -> ShowS
$cshowsPrec :: Int -> DeleteVoiceConnectorTermination -> ShowS
Prelude.Show, forall x.
Rep DeleteVoiceConnectorTermination x
-> DeleteVoiceConnectorTermination
forall x.
DeleteVoiceConnectorTermination
-> Rep DeleteVoiceConnectorTermination x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteVoiceConnectorTermination x
-> DeleteVoiceConnectorTermination
$cfrom :: forall x.
DeleteVoiceConnectorTermination
-> Rep DeleteVoiceConnectorTermination x
Prelude.Generic)
newDeleteVoiceConnectorTermination ::
Prelude.Text ->
DeleteVoiceConnectorTermination
newDeleteVoiceConnectorTermination :: Text -> DeleteVoiceConnectorTermination
newDeleteVoiceConnectorTermination Text
pVoiceConnectorId_ =
DeleteVoiceConnectorTermination'
{ $sel:voiceConnectorId:DeleteVoiceConnectorTermination' :: Text
voiceConnectorId =
Text
pVoiceConnectorId_
}
deleteVoiceConnectorTermination_voiceConnectorId :: Lens.Lens' DeleteVoiceConnectorTermination Prelude.Text
deleteVoiceConnectorTermination_voiceConnectorId :: Lens' DeleteVoiceConnectorTermination Text
deleteVoiceConnectorTermination_voiceConnectorId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteVoiceConnectorTermination' {Text
voiceConnectorId :: Text
$sel:voiceConnectorId:DeleteVoiceConnectorTermination' :: DeleteVoiceConnectorTermination -> Text
voiceConnectorId} -> Text
voiceConnectorId) (\s :: DeleteVoiceConnectorTermination
s@DeleteVoiceConnectorTermination' {} Text
a -> DeleteVoiceConnectorTermination
s {$sel:voiceConnectorId:DeleteVoiceConnectorTermination' :: Text
voiceConnectorId = Text
a} :: DeleteVoiceConnectorTermination)
instance
Core.AWSRequest
DeleteVoiceConnectorTermination
where
type
AWSResponse DeleteVoiceConnectorTermination =
DeleteVoiceConnectorTerminationResponse
request :: (Service -> Service)
-> DeleteVoiceConnectorTermination
-> Request DeleteVoiceConnectorTermination
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 DeleteVoiceConnectorTermination
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DeleteVoiceConnectorTermination)))
response =
forall (m :: * -> *) a.
MonadResource m =>
AWSResponse a
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveNull
DeleteVoiceConnectorTerminationResponse
DeleteVoiceConnectorTerminationResponse'
instance
Prelude.Hashable
DeleteVoiceConnectorTermination
where
hashWithSalt :: Int -> DeleteVoiceConnectorTermination -> Int
hashWithSalt
Int
_salt
DeleteVoiceConnectorTermination' {Text
voiceConnectorId :: Text
$sel:voiceConnectorId:DeleteVoiceConnectorTermination' :: DeleteVoiceConnectorTermination -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
voiceConnectorId
instance
Prelude.NFData
DeleteVoiceConnectorTermination
where
rnf :: DeleteVoiceConnectorTermination -> ()
rnf DeleteVoiceConnectorTermination' {Text
voiceConnectorId :: Text
$sel:voiceConnectorId:DeleteVoiceConnectorTermination' :: DeleteVoiceConnectorTermination -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
voiceConnectorId
instance
Data.ToHeaders
DeleteVoiceConnectorTermination
where
toHeaders :: DeleteVoiceConnectorTermination -> [Header]
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath DeleteVoiceConnectorTermination where
toPath :: DeleteVoiceConnectorTermination -> ByteString
toPath DeleteVoiceConnectorTermination' {Text
voiceConnectorId :: Text
$sel:voiceConnectorId:DeleteVoiceConnectorTermination' :: DeleteVoiceConnectorTermination -> Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/voice-connectors/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
voiceConnectorId,
ByteString
"/termination"
]
instance Data.ToQuery DeleteVoiceConnectorTermination where
toQuery :: DeleteVoiceConnectorTermination -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DeleteVoiceConnectorTerminationResponse = DeleteVoiceConnectorTerminationResponse'
{
}
deriving (DeleteVoiceConnectorTerminationResponse
-> DeleteVoiceConnectorTerminationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteVoiceConnectorTerminationResponse
-> DeleteVoiceConnectorTerminationResponse -> Bool
$c/= :: DeleteVoiceConnectorTerminationResponse
-> DeleteVoiceConnectorTerminationResponse -> Bool
== :: DeleteVoiceConnectorTerminationResponse
-> DeleteVoiceConnectorTerminationResponse -> Bool
$c== :: DeleteVoiceConnectorTerminationResponse
-> DeleteVoiceConnectorTerminationResponse -> Bool
Prelude.Eq, ReadPrec [DeleteVoiceConnectorTerminationResponse]
ReadPrec DeleteVoiceConnectorTerminationResponse
Int -> ReadS DeleteVoiceConnectorTerminationResponse
ReadS [DeleteVoiceConnectorTerminationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteVoiceConnectorTerminationResponse]
$creadListPrec :: ReadPrec [DeleteVoiceConnectorTerminationResponse]
readPrec :: ReadPrec DeleteVoiceConnectorTerminationResponse
$creadPrec :: ReadPrec DeleteVoiceConnectorTerminationResponse
readList :: ReadS [DeleteVoiceConnectorTerminationResponse]
$creadList :: ReadS [DeleteVoiceConnectorTerminationResponse]
readsPrec :: Int -> ReadS DeleteVoiceConnectorTerminationResponse
$creadsPrec :: Int -> ReadS DeleteVoiceConnectorTerminationResponse
Prelude.Read, Int -> DeleteVoiceConnectorTerminationResponse -> ShowS
[DeleteVoiceConnectorTerminationResponse] -> ShowS
DeleteVoiceConnectorTerminationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteVoiceConnectorTerminationResponse] -> ShowS
$cshowList :: [DeleteVoiceConnectorTerminationResponse] -> ShowS
show :: DeleteVoiceConnectorTerminationResponse -> String
$cshow :: DeleteVoiceConnectorTerminationResponse -> String
showsPrec :: Int -> DeleteVoiceConnectorTerminationResponse -> ShowS
$cshowsPrec :: Int -> DeleteVoiceConnectorTerminationResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteVoiceConnectorTerminationResponse x
-> DeleteVoiceConnectorTerminationResponse
forall x.
DeleteVoiceConnectorTerminationResponse
-> Rep DeleteVoiceConnectorTerminationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteVoiceConnectorTerminationResponse x
-> DeleteVoiceConnectorTerminationResponse
$cfrom :: forall x.
DeleteVoiceConnectorTerminationResponse
-> Rep DeleteVoiceConnectorTerminationResponse x
Prelude.Generic)
newDeleteVoiceConnectorTerminationResponse ::
DeleteVoiceConnectorTerminationResponse
newDeleteVoiceConnectorTerminationResponse :: DeleteVoiceConnectorTerminationResponse
newDeleteVoiceConnectorTerminationResponse =
DeleteVoiceConnectorTerminationResponse
DeleteVoiceConnectorTerminationResponse'
instance
Prelude.NFData
DeleteVoiceConnectorTerminationResponse
where
rnf :: DeleteVoiceConnectorTerminationResponse -> ()
rnf DeleteVoiceConnectorTerminationResponse
_ = ()