module Stratosphere.EFS.FileSystem.ElasticFileSystemTagProperty (
ElasticFileSystemTagProperty(..), mkElasticFileSystemTagProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ElasticFileSystemTagProperty
=
ElasticFileSystemTagProperty {ElasticFileSystemTagProperty -> ()
haddock_workaround_ :: (),
ElasticFileSystemTagProperty -> Value Text
key :: (Value Prelude.Text),
ElasticFileSystemTagProperty -> Value Text
value :: (Value Prelude.Text)}
deriving stock (ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool
(ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool)
-> (ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool)
-> Eq ElasticFileSystemTagProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool
== :: ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool
$c/= :: ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool
/= :: ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> Bool
Prelude.Eq, Int -> ElasticFileSystemTagProperty -> ShowS
[ElasticFileSystemTagProperty] -> ShowS
ElasticFileSystemTagProperty -> String
(Int -> ElasticFileSystemTagProperty -> ShowS)
-> (ElasticFileSystemTagProperty -> String)
-> ([ElasticFileSystemTagProperty] -> ShowS)
-> Show ElasticFileSystemTagProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ElasticFileSystemTagProperty -> ShowS
showsPrec :: Int -> ElasticFileSystemTagProperty -> ShowS
$cshow :: ElasticFileSystemTagProperty -> String
show :: ElasticFileSystemTagProperty -> String
$cshowList :: [ElasticFileSystemTagProperty] -> ShowS
showList :: [ElasticFileSystemTagProperty] -> ShowS
Prelude.Show)
mkElasticFileSystemTagProperty ::
Value Prelude.Text
-> Value Prelude.Text -> ElasticFileSystemTagProperty
mkElasticFileSystemTagProperty :: Value Text -> Value Text -> ElasticFileSystemTagProperty
mkElasticFileSystemTagProperty Value Text
key Value Text
value
= ElasticFileSystemTagProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), key :: Value Text
key = Value Text
key, value :: Value Text
value = Value Text
value}
instance ToResourceProperties ElasticFileSystemTagProperty where
toResourceProperties :: ElasticFileSystemTagProperty -> ResourceProperties
toResourceProperties ElasticFileSystemTagProperty {()
Value Text
haddock_workaround_ :: ElasticFileSystemTagProperty -> ()
key :: ElasticFileSystemTagProperty -> Value Text
value :: ElasticFileSystemTagProperty -> Value Text
haddock_workaround_ :: ()
key :: Value Text
value :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::EFS::FileSystem.ElasticFileSystemTag",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Key" 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
key, Key
"Value" 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
value]}
instance JSON.ToJSON ElasticFileSystemTagProperty where
toJSON :: ElasticFileSystemTagProperty -> Value
toJSON ElasticFileSystemTagProperty {()
Value Text
haddock_workaround_ :: ElasticFileSystemTagProperty -> ()
key :: ElasticFileSystemTagProperty -> Value Text
value :: ElasticFileSystemTagProperty -> Value Text
haddock_workaround_ :: ()
key :: Value Text
value :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"Key" 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
key, Key
"Value" 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
value]
instance Property "Key" ElasticFileSystemTagProperty where
type PropertyType "Key" ElasticFileSystemTagProperty = Value Prelude.Text
set :: PropertyType "Key" ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> ElasticFileSystemTagProperty
set PropertyType "Key" ElasticFileSystemTagProperty
newValue ElasticFileSystemTagProperty {()
Value Text
haddock_workaround_ :: ElasticFileSystemTagProperty -> ()
key :: ElasticFileSystemTagProperty -> Value Text
value :: ElasticFileSystemTagProperty -> Value Text
haddock_workaround_ :: ()
key :: Value Text
value :: Value Text
..}
= ElasticFileSystemTagProperty {key :: Value Text
key = PropertyType "Key" ElasticFileSystemTagProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
value :: Value Text
haddock_workaround_ :: ()
value :: Value Text
..}
instance Property "Value" ElasticFileSystemTagProperty where
type PropertyType "Value" ElasticFileSystemTagProperty = Value Prelude.Text
set :: PropertyType "Value" ElasticFileSystemTagProperty
-> ElasticFileSystemTagProperty -> ElasticFileSystemTagProperty
set PropertyType "Value" ElasticFileSystemTagProperty
newValue ElasticFileSystemTagProperty {()
Value Text
haddock_workaround_ :: ElasticFileSystemTagProperty -> ()
key :: ElasticFileSystemTagProperty -> Value Text
value :: ElasticFileSystemTagProperty -> Value Text
haddock_workaround_ :: ()
key :: Value Text
value :: Value Text
..}
= ElasticFileSystemTagProperty {value :: Value Text
value = PropertyType "Value" ElasticFileSystemTagProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
key :: Value Text
haddock_workaround_ :: ()
key :: Value Text
..}