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