module Stratosphere.QBusiness.DataSource.AudioExtractionConfigurationProperty (
AudioExtractionConfigurationProperty(..),
mkAudioExtractionConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data
=
{AudioExtractionConfigurationProperty -> ()
haddock_workaround_ :: (),
:: (Value Prelude.Text)}
deriving stock (AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool
(AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool)
-> (AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool)
-> Eq AudioExtractionConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool
== :: AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool
$c/= :: AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool
/= :: AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty -> Bool
Prelude.Eq, Int -> AudioExtractionConfigurationProperty -> ShowS
[AudioExtractionConfigurationProperty] -> ShowS
AudioExtractionConfigurationProperty -> String
(Int -> AudioExtractionConfigurationProperty -> ShowS)
-> (AudioExtractionConfigurationProperty -> String)
-> ([AudioExtractionConfigurationProperty] -> ShowS)
-> Show AudioExtractionConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AudioExtractionConfigurationProperty -> ShowS
showsPrec :: Int -> AudioExtractionConfigurationProperty -> ShowS
$cshow :: AudioExtractionConfigurationProperty -> String
show :: AudioExtractionConfigurationProperty -> String
$cshowList :: [AudioExtractionConfigurationProperty] -> ShowS
showList :: [AudioExtractionConfigurationProperty] -> ShowS
Prelude.Show)
mkAudioExtractionConfigurationProperty ::
Value Prelude.Text -> AudioExtractionConfigurationProperty
Value Text
audioExtractionStatus
= AudioExtractionConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
audioExtractionStatus :: Value Text
audioExtractionStatus = Value Text
audioExtractionStatus}
instance ToResourceProperties AudioExtractionConfigurationProperty where
toResourceProperties :: AudioExtractionConfigurationProperty -> ResourceProperties
toResourceProperties AudioExtractionConfigurationProperty {()
Value Text
haddock_workaround_ :: AudioExtractionConfigurationProperty -> ()
audioExtractionStatus :: AudioExtractionConfigurationProperty -> Value Text
haddock_workaround_ :: ()
audioExtractionStatus :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::QBusiness::DataSource.AudioExtractionConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"AudioExtractionStatus"
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
audioExtractionStatus]}
instance JSON.ToJSON AudioExtractionConfigurationProperty where
toJSON :: AudioExtractionConfigurationProperty -> Value
toJSON AudioExtractionConfigurationProperty {()
Value Text
haddock_workaround_ :: AudioExtractionConfigurationProperty -> ()
audioExtractionStatus :: AudioExtractionConfigurationProperty -> Value Text
haddock_workaround_ :: ()
audioExtractionStatus :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"AudioExtractionStatus" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
audioExtractionStatus]
instance Property "AudioExtractionStatus" AudioExtractionConfigurationProperty where
type PropertyType "AudioExtractionStatus" AudioExtractionConfigurationProperty = Value Prelude.Text
set :: PropertyType
"AudioExtractionStatus" AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty
-> AudioExtractionConfigurationProperty
set PropertyType
"AudioExtractionStatus" AudioExtractionConfigurationProperty
newValue AudioExtractionConfigurationProperty {()
Value Text
haddock_workaround_ :: AudioExtractionConfigurationProperty -> ()
audioExtractionStatus :: AudioExtractionConfigurationProperty -> Value Text
haddock_workaround_ :: ()
audioExtractionStatus :: Value Text
..}
= AudioExtractionConfigurationProperty
{audioExtractionStatus :: Value Text
audioExtractionStatus = PropertyType
"AudioExtractionStatus" AudioExtractionConfigurationProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}