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