module Stratosphere.CustomerProfiles.EventTrigger (
        module Exports, EventTrigger(..), mkEventTrigger
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CustomerProfiles.EventTrigger.EventTriggerConditionProperty as Exports
import {-# SOURCE #-} Stratosphere.CustomerProfiles.EventTrigger.EventTriggerLimitsProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data EventTrigger
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html>
    EventTrigger {EventTrigger -> ()
haddock_workaround_ :: (),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-description>
                  EventTrigger -> Maybe (Value Text)
description :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-domainname>
                  EventTrigger -> Value Text
domainName :: (Value Prelude.Text),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-eventtriggerconditions>
                  EventTrigger -> [EventTriggerConditionProperty]
eventTriggerConditions :: [EventTriggerConditionProperty],
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-eventtriggerlimits>
                  EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerLimits :: (Prelude.Maybe EventTriggerLimitsProperty),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-eventtriggername>
                  EventTrigger -> Value Text
eventTriggerName :: (Value Prelude.Text),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-objecttypename>
                  EventTrigger -> Value Text
objectTypeName :: (Value Prelude.Text),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-segmentfilter>
                  EventTrigger -> Maybe (Value Text)
segmentFilter :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-customerprofiles-eventtrigger.html#cfn-customerprofiles-eventtrigger-tags>
                  EventTrigger -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
  deriving stock (EventTrigger -> EventTrigger -> Bool
(EventTrigger -> EventTrigger -> Bool)
-> (EventTrigger -> EventTrigger -> Bool) -> Eq EventTrigger
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EventTrigger -> EventTrigger -> Bool
== :: EventTrigger -> EventTrigger -> Bool
$c/= :: EventTrigger -> EventTrigger -> Bool
/= :: EventTrigger -> EventTrigger -> Bool
Prelude.Eq, Int -> EventTrigger -> ShowS
[EventTrigger] -> ShowS
EventTrigger -> String
(Int -> EventTrigger -> ShowS)
-> (EventTrigger -> String)
-> ([EventTrigger] -> ShowS)
-> Show EventTrigger
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EventTrigger -> ShowS
showsPrec :: Int -> EventTrigger -> ShowS
$cshow :: EventTrigger -> String
show :: EventTrigger -> String
$cshowList :: [EventTrigger] -> ShowS
showList :: [EventTrigger] -> ShowS
Prelude.Show)
mkEventTrigger ::
  Value Prelude.Text
  -> [EventTriggerConditionProperty]
     -> Value Prelude.Text -> Value Prelude.Text -> EventTrigger
mkEventTrigger :: Value Text
-> [EventTriggerConditionProperty]
-> Value Text
-> Value Text
-> EventTrigger
mkEventTrigger
  Value Text
domainName
  [EventTriggerConditionProperty]
eventTriggerConditions
  Value Text
eventTriggerName
  Value Text
objectTypeName
  = EventTrigger
      {haddock_workaround_ :: ()
haddock_workaround_ = (), domainName :: Value Text
domainName = Value Text
domainName,
       eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerConditions = [EventTriggerConditionProperty]
eventTriggerConditions,
       eventTriggerName :: Value Text
eventTriggerName = Value Text
eventTriggerName,
       objectTypeName :: Value Text
objectTypeName = Value Text
objectTypeName, description :: Maybe (Value Text)
description = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerLimits = Maybe EventTriggerLimitsProperty
forall a. Maybe a
Prelude.Nothing,
       segmentFilter :: Maybe (Value Text)
segmentFilter = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties EventTrigger where
  toResourceProperties :: EventTrigger -> ResourceProperties
toResourceProperties EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::CustomerProfiles::EventTrigger",
         supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         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
"DomainName" 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
domainName,
                            Key
"EventTriggerConditions" Key -> [EventTriggerConditionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [EventTriggerConditionProperty]
eventTriggerConditions,
                            Key
"EventTriggerName" 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
eventTriggerName,
                            Key
"ObjectTypeName" 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
objectTypeName]
                           ([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
"Description" (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)
description,
                               Key -> EventTriggerLimitsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EventTriggerLimits" (EventTriggerLimitsProperty -> (Key, Value))
-> Maybe EventTriggerLimitsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EventTriggerLimitsProperty
eventTriggerLimits,
                               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
"SegmentFilter" (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)
segmentFilter,
                               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags]))}
instance JSON.ToJSON EventTrigger where
  toJSON :: EventTrigger -> Value
toJSON EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = [(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
"DomainName" 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
domainName,
               Key
"EventTriggerConditions" Key -> [EventTriggerConditionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [EventTriggerConditionProperty]
eventTriggerConditions,
               Key
"EventTriggerName" 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
eventTriggerName,
               Key
"ObjectTypeName" 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
objectTypeName]
              ([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
"Description" (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)
description,
                  Key -> EventTriggerLimitsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EventTriggerLimits" (EventTriggerLimitsProperty -> (Key, Value))
-> Maybe EventTriggerLimitsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EventTriggerLimitsProperty
eventTriggerLimits,
                  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
"SegmentFilter" (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)
segmentFilter,
                  Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags])))
instance Property "Description" EventTrigger where
  type PropertyType "Description" EventTrigger = Value Prelude.Text
  set :: PropertyType "Description" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "Description" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {description :: Maybe (Value Text)
description = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Description" EventTrigger
Value Text
newValue, [EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "DomainName" EventTrigger where
  type PropertyType "DomainName" EventTrigger = Value Prelude.Text
  set :: PropertyType "DomainName" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "DomainName" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {domainName :: Value Text
domainName = PropertyType "DomainName" EventTrigger
Value Text
newValue, [EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "EventTriggerConditions" EventTrigger where
  type PropertyType "EventTriggerConditions" EventTrigger = [EventTriggerConditionProperty]
  set :: PropertyType "EventTriggerConditions" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "EventTriggerConditions" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerConditions = [EventTriggerConditionProperty]
PropertyType "EventTriggerConditions" EventTrigger
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "EventTriggerLimits" EventTrigger where
  type PropertyType "EventTriggerLimits" EventTrigger = EventTriggerLimitsProperty
  set :: PropertyType "EventTriggerLimits" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "EventTriggerLimits" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerLimits = EventTriggerLimitsProperty -> Maybe EventTriggerLimitsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EventTriggerLimits" EventTrigger
EventTriggerLimitsProperty
newValue, [EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "EventTriggerName" EventTrigger where
  type PropertyType "EventTriggerName" EventTrigger = Value Prelude.Text
  set :: PropertyType "EventTriggerName" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "EventTriggerName" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {eventTriggerName :: Value Text
eventTriggerName = PropertyType "EventTriggerName" EventTrigger
Value Text
newValue, [EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ObjectTypeName" EventTrigger where
  type PropertyType "ObjectTypeName" EventTrigger = Value Prelude.Text
  set :: PropertyType "ObjectTypeName" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "ObjectTypeName" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {objectTypeName :: Value Text
objectTypeName = PropertyType "ObjectTypeName" EventTrigger
Value Text
newValue, [EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "SegmentFilter" EventTrigger where
  type PropertyType "SegmentFilter" EventTrigger = Value Prelude.Text
  set :: PropertyType "SegmentFilter" EventTrigger
-> EventTrigger -> EventTrigger
set PropertyType "SegmentFilter" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {segmentFilter :: Maybe (Value Text)
segmentFilter = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SegmentFilter" EventTrigger
Value Text
newValue, [EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
tags :: Maybe [Tag]
..}
instance Property "Tags" EventTrigger where
  type PropertyType "Tags" EventTrigger = [Tag]
  set :: PropertyType "Tags" EventTrigger -> EventTrigger -> EventTrigger
set PropertyType "Tags" EventTrigger
newValue EventTrigger {[EventTriggerConditionProperty]
Maybe [Tag]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: EventTrigger -> ()
description :: EventTrigger -> Maybe (Value Text)
domainName :: EventTrigger -> Value Text
eventTriggerConditions :: EventTrigger -> [EventTriggerConditionProperty]
eventTriggerLimits :: EventTrigger -> Maybe EventTriggerLimitsProperty
eventTriggerName :: EventTrigger -> Value Text
objectTypeName :: EventTrigger -> Value Text
segmentFilter :: EventTrigger -> Maybe (Value Text)
tags :: EventTrigger -> Maybe [Tag]
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
    = EventTrigger {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" EventTrigger
newValue, [EventTriggerConditionProperty]
Maybe (Value Text)
Maybe EventTriggerLimitsProperty
()
Value Text
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
haddock_workaround_ :: ()
description :: Maybe (Value Text)
domainName :: Value Text
eventTriggerConditions :: [EventTriggerConditionProperty]
eventTriggerLimits :: Maybe EventTriggerLimitsProperty
eventTriggerName :: Value Text
objectTypeName :: Value Text
segmentFilter :: Maybe (Value Text)
..}