module Stratosphere.VerifiedPermissions.PolicyStore.ValidationSettingsProperty (
        ValidationSettingsProperty(..), mkValidationSettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ValidationSettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-verifiedpermissions-policystore-validationsettings.html>
    ValidationSettingsProperty {ValidationSettingsProperty -> ()
haddock_workaround_ :: (),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-verifiedpermissions-policystore-validationsettings.html#cfn-verifiedpermissions-policystore-validationsettings-mode>
                                ValidationSettingsProperty -> Value Text
mode :: (Value Prelude.Text)}
  deriving stock (ValidationSettingsProperty -> ValidationSettingsProperty -> Bool
(ValidationSettingsProperty -> ValidationSettingsProperty -> Bool)
-> (ValidationSettingsProperty
    -> ValidationSettingsProperty -> Bool)
-> Eq ValidationSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ValidationSettingsProperty -> ValidationSettingsProperty -> Bool
== :: ValidationSettingsProperty -> ValidationSettingsProperty -> Bool
$c/= :: ValidationSettingsProperty -> ValidationSettingsProperty -> Bool
/= :: ValidationSettingsProperty -> ValidationSettingsProperty -> Bool
Prelude.Eq, Int -> ValidationSettingsProperty -> ShowS
[ValidationSettingsProperty] -> ShowS
ValidationSettingsProperty -> String
(Int -> ValidationSettingsProperty -> ShowS)
-> (ValidationSettingsProperty -> String)
-> ([ValidationSettingsProperty] -> ShowS)
-> Show ValidationSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ValidationSettingsProperty -> ShowS
showsPrec :: Int -> ValidationSettingsProperty -> ShowS
$cshow :: ValidationSettingsProperty -> String
show :: ValidationSettingsProperty -> String
$cshowList :: [ValidationSettingsProperty] -> ShowS
showList :: [ValidationSettingsProperty] -> ShowS
Prelude.Show)
mkValidationSettingsProperty ::
  Value Prelude.Text -> ValidationSettingsProperty
mkValidationSettingsProperty :: Value Text -> ValidationSettingsProperty
mkValidationSettingsProperty Value Text
mode
  = ValidationSettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), mode :: Value Text
mode = Value Text
mode}
instance ToResourceProperties ValidationSettingsProperty where
  toResourceProperties :: ValidationSettingsProperty -> ResourceProperties
toResourceProperties ValidationSettingsProperty {()
Value Text
haddock_workaround_ :: ValidationSettingsProperty -> ()
mode :: ValidationSettingsProperty -> Value Text
haddock_workaround_ :: ()
mode :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::VerifiedPermissions::PolicyStore.ValidationSettings",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False, properties :: Object
properties = [Key
"Mode" 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
mode]}
instance JSON.ToJSON ValidationSettingsProperty where
  toJSON :: ValidationSettingsProperty -> Value
toJSON ValidationSettingsProperty {()
Value Text
haddock_workaround_ :: ValidationSettingsProperty -> ()
mode :: ValidationSettingsProperty -> Value Text
haddock_workaround_ :: ()
mode :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Mode" 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
mode]
instance Property "Mode" ValidationSettingsProperty where
  type PropertyType "Mode" ValidationSettingsProperty = Value Prelude.Text
  set :: PropertyType "Mode" ValidationSettingsProperty
-> ValidationSettingsProperty -> ValidationSettingsProperty
set PropertyType "Mode" ValidationSettingsProperty
newValue ValidationSettingsProperty {()
Value Text
haddock_workaround_ :: ValidationSettingsProperty -> ()
mode :: ValidationSettingsProperty -> Value Text
haddock_workaround_ :: ()
mode :: Value Text
..}
    = ValidationSettingsProperty {mode :: Value Text
mode = PropertyType "Mode" ValidationSettingsProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}