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