module Stratosphere.WorkSpacesWeb.DataProtectionSettings.InlineRedactionPatternProperty (
        module Exports, InlineRedactionPatternProperty(..),
        mkInlineRedactionPatternProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.WorkSpacesWeb.DataProtectionSettings.CustomPatternProperty as Exports
import {-# SOURCE #-} Stratosphere.WorkSpacesWeb.DataProtectionSettings.RedactionPlaceHolderProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data InlineRedactionPatternProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html>
    InlineRedactionPatternProperty {InlineRedactionPatternProperty -> ()
haddock_workaround_ :: (),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html#cfn-workspacesweb-dataprotectionsettings-inlineredactionpattern-builtinpatternid>
                                    InlineRedactionPatternProperty -> Maybe (Value Text)
builtInPatternId :: (Prelude.Maybe (Value Prelude.Text)),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html#cfn-workspacesweb-dataprotectionsettings-inlineredactionpattern-confidencelevel>
                                    InlineRedactionPatternProperty -> Maybe (Value Double)
confidenceLevel :: (Prelude.Maybe (Value Prelude.Double)),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html#cfn-workspacesweb-dataprotectionsettings-inlineredactionpattern-custompattern>
                                    InlineRedactionPatternProperty -> Maybe CustomPatternProperty
customPattern :: (Prelude.Maybe CustomPatternProperty),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html#cfn-workspacesweb-dataprotectionsettings-inlineredactionpattern-enforcedurls>
                                    InlineRedactionPatternProperty -> Maybe (ValueList Text)
enforcedUrls :: (Prelude.Maybe (ValueList Prelude.Text)),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html#cfn-workspacesweb-dataprotectionsettings-inlineredactionpattern-exempturls>
                                    InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: (Prelude.Maybe (ValueList Prelude.Text)),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-dataprotectionsettings-inlineredactionpattern.html#cfn-workspacesweb-dataprotectionsettings-inlineredactionpattern-redactionplaceholder>
                                    InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
redactionPlaceHolder :: RedactionPlaceHolderProperty}
  deriving stock (InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> Bool
(InlineRedactionPatternProperty
 -> InlineRedactionPatternProperty -> Bool)
-> (InlineRedactionPatternProperty
    -> InlineRedactionPatternProperty -> Bool)
-> Eq InlineRedactionPatternProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> Bool
== :: InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> Bool
$c/= :: InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> Bool
/= :: InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> Bool
Prelude.Eq, Int -> InlineRedactionPatternProperty -> ShowS
[InlineRedactionPatternProperty] -> ShowS
InlineRedactionPatternProperty -> String
(Int -> InlineRedactionPatternProperty -> ShowS)
-> (InlineRedactionPatternProperty -> String)
-> ([InlineRedactionPatternProperty] -> ShowS)
-> Show InlineRedactionPatternProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> InlineRedactionPatternProperty -> ShowS
showsPrec :: Int -> InlineRedactionPatternProperty -> ShowS
$cshow :: InlineRedactionPatternProperty -> String
show :: InlineRedactionPatternProperty -> String
$cshowList :: [InlineRedactionPatternProperty] -> ShowS
showList :: [InlineRedactionPatternProperty] -> ShowS
Prelude.Show)
mkInlineRedactionPatternProperty ::
  RedactionPlaceHolderProperty -> InlineRedactionPatternProperty
mkInlineRedactionPatternProperty :: RedactionPlaceHolderProperty -> InlineRedactionPatternProperty
mkInlineRedactionPatternProperty RedactionPlaceHolderProperty
redactionPlaceHolder
  = InlineRedactionPatternProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       redactionPlaceHolder :: RedactionPlaceHolderProperty
redactionPlaceHolder = RedactionPlaceHolderProperty
redactionPlaceHolder,
       builtInPatternId :: Maybe (Value Text)
builtInPatternId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       confidenceLevel :: Maybe (Value Double)
confidenceLevel = Maybe (Value Double)
forall a. Maybe a
Prelude.Nothing, customPattern :: Maybe CustomPatternProperty
customPattern = Maybe CustomPatternProperty
forall a. Maybe a
Prelude.Nothing,
       enforcedUrls :: Maybe (ValueList Text)
enforcedUrls = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, exemptUrls :: Maybe (ValueList Text)
exemptUrls = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties InlineRedactionPatternProperty where
  toResourceProperties :: InlineRedactionPatternProperty -> ResourceProperties
toResourceProperties InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::WorkSpacesWeb::DataProtectionSettings.InlineRedactionPattern",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"RedactionPlaceHolder" Key -> RedactionPlaceHolderProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RedactionPlaceHolderProperty
redactionPlaceHolder]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [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..=) Key
"BuiltInPatternId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
builtInPatternId,
                               Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConfidenceLevel" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
confidenceLevel,
                               Key -> CustomPatternProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CustomPattern" (CustomPatternProperty -> (Key, Value))
-> Maybe CustomPatternProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CustomPatternProperty
customPattern,
                               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnforcedUrls" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
enforcedUrls,
                               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExemptUrls" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
exemptUrls]))}
instance JSON.ToJSON InlineRedactionPatternProperty where
  toJSON :: InlineRedactionPatternProperty -> Value
toJSON InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"RedactionPlaceHolder" Key -> RedactionPlaceHolderProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RedactionPlaceHolderProperty
redactionPlaceHolder]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [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..=) Key
"BuiltInPatternId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
builtInPatternId,
                  Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConfidenceLevel" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
confidenceLevel,
                  Key -> CustomPatternProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CustomPattern" (CustomPatternProperty -> (Key, Value))
-> Maybe CustomPatternProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CustomPatternProperty
customPattern,
                  Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnforcedUrls" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
enforcedUrls,
                  Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExemptUrls" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
exemptUrls])))
instance Property "BuiltInPatternId" InlineRedactionPatternProperty where
  type PropertyType "BuiltInPatternId" InlineRedactionPatternProperty = Value Prelude.Text
  set :: PropertyType "BuiltInPatternId" InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> InlineRedactionPatternProperty
set PropertyType "BuiltInPatternId" InlineRedactionPatternProperty
newValue InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = InlineRedactionPatternProperty
        {builtInPatternId :: Maybe (Value Text)
builtInPatternId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "BuiltInPatternId" InlineRedactionPatternProperty
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Double)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: ()
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
haddock_workaround_ :: ()
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
instance Property "ConfidenceLevel" InlineRedactionPatternProperty where
  type PropertyType "ConfidenceLevel" InlineRedactionPatternProperty = Value Prelude.Double
  set :: PropertyType "ConfidenceLevel" InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> InlineRedactionPatternProperty
set PropertyType "ConfidenceLevel" InlineRedactionPatternProperty
newValue InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = InlineRedactionPatternProperty
        {confidenceLevel :: Maybe (Value Double)
confidenceLevel = Value Double -> Maybe (Value Double)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ConfidenceLevel" InlineRedactionPatternProperty
Value Double
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
instance Property "CustomPattern" InlineRedactionPatternProperty where
  type PropertyType "CustomPattern" InlineRedactionPatternProperty = CustomPatternProperty
  set :: PropertyType "CustomPattern" InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> InlineRedactionPatternProperty
set PropertyType "CustomPattern" InlineRedactionPatternProperty
newValue InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = InlineRedactionPatternProperty
        {customPattern :: Maybe CustomPatternProperty
customPattern = CustomPatternProperty -> Maybe CustomPatternProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CustomPattern" InlineRedactionPatternProperty
CustomPatternProperty
newValue, Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
()
RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
instance Property "EnforcedUrls" InlineRedactionPatternProperty where
  type PropertyType "EnforcedUrls" InlineRedactionPatternProperty = ValueList Prelude.Text
  set :: PropertyType "EnforcedUrls" InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> InlineRedactionPatternProperty
set PropertyType "EnforcedUrls" InlineRedactionPatternProperty
newValue InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = InlineRedactionPatternProperty
        {enforcedUrls :: Maybe (ValueList Text)
enforcedUrls = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnforcedUrls" InlineRedactionPatternProperty
ValueList Text
newValue, Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
instance Property "ExemptUrls" InlineRedactionPatternProperty where
  type PropertyType "ExemptUrls" InlineRedactionPatternProperty = ValueList Prelude.Text
  set :: PropertyType "ExemptUrls" InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> InlineRedactionPatternProperty
set PropertyType "ExemptUrls" InlineRedactionPatternProperty
newValue InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = InlineRedactionPatternProperty
        {exemptUrls :: Maybe (ValueList Text)
exemptUrls = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ExemptUrls" InlineRedactionPatternProperty
ValueList Text
newValue, Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
instance Property "RedactionPlaceHolder" InlineRedactionPatternProperty where
  type PropertyType "RedactionPlaceHolder" InlineRedactionPatternProperty = RedactionPlaceHolderProperty
  set :: PropertyType "RedactionPlaceHolder" InlineRedactionPatternProperty
-> InlineRedactionPatternProperty -> InlineRedactionPatternProperty
set PropertyType "RedactionPlaceHolder" InlineRedactionPatternProperty
newValue InlineRedactionPatternProperty {Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
RedactionPlaceHolderProperty
haddock_workaround_ :: InlineRedactionPatternProperty -> ()
builtInPatternId :: InlineRedactionPatternProperty -> Maybe (Value Text)
confidenceLevel :: InlineRedactionPatternProperty -> Maybe (Value Double)
customPattern :: InlineRedactionPatternProperty -> Maybe CustomPatternProperty
enforcedUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
exemptUrls :: InlineRedactionPatternProperty -> Maybe (ValueList Text)
redactionPlaceHolder :: InlineRedactionPatternProperty -> RedactionPlaceHolderProperty
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
redactionPlaceHolder :: RedactionPlaceHolderProperty
..}
    = InlineRedactionPatternProperty
        {redactionPlaceHolder :: RedactionPlaceHolderProperty
redactionPlaceHolder = PropertyType "RedactionPlaceHolder" InlineRedactionPatternProperty
RedactionPlaceHolderProperty
newValue, Maybe (ValueList Text)
Maybe (Value Double)
Maybe (Value Text)
Maybe CustomPatternProperty
()
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
haddock_workaround_ :: ()
builtInPatternId :: Maybe (Value Text)
confidenceLevel :: Maybe (Value Double)
customPattern :: Maybe CustomPatternProperty
enforcedUrls :: Maybe (ValueList Text)
exemptUrls :: Maybe (ValueList Text)
..}