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