module Stratosphere.ConnectCampaignsV2.Campaign.RestrictedPeriodsProperty (
module Exports, RestrictedPeriodsProperty(..),
mkRestrictedPeriodsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ConnectCampaignsV2.Campaign.RestrictedPeriodProperty as Exports
import Stratosphere.ResourceProperties
data RestrictedPeriodsProperty
=
RestrictedPeriodsProperty {RestrictedPeriodsProperty -> ()
haddock_workaround_ :: (),
RestrictedPeriodsProperty -> [RestrictedPeriodProperty]
restrictedPeriodList :: [RestrictedPeriodProperty]}
deriving stock (RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool
(RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool)
-> (RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool)
-> Eq RestrictedPeriodsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool
== :: RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool
$c/= :: RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool
/= :: RestrictedPeriodsProperty -> RestrictedPeriodsProperty -> Bool
Prelude.Eq, Int -> RestrictedPeriodsProperty -> ShowS
[RestrictedPeriodsProperty] -> ShowS
RestrictedPeriodsProperty -> String
(Int -> RestrictedPeriodsProperty -> ShowS)
-> (RestrictedPeriodsProperty -> String)
-> ([RestrictedPeriodsProperty] -> ShowS)
-> Show RestrictedPeriodsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RestrictedPeriodsProperty -> ShowS
showsPrec :: Int -> RestrictedPeriodsProperty -> ShowS
$cshow :: RestrictedPeriodsProperty -> String
show :: RestrictedPeriodsProperty -> String
$cshowList :: [RestrictedPeriodsProperty] -> ShowS
showList :: [RestrictedPeriodsProperty] -> ShowS
Prelude.Show)
mkRestrictedPeriodsProperty ::
[RestrictedPeriodProperty] -> RestrictedPeriodsProperty
mkRestrictedPeriodsProperty :: [RestrictedPeriodProperty] -> RestrictedPeriodsProperty
mkRestrictedPeriodsProperty [RestrictedPeriodProperty]
restrictedPeriodList
= RestrictedPeriodsProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
restrictedPeriodList :: [RestrictedPeriodProperty]
restrictedPeriodList = [RestrictedPeriodProperty]
restrictedPeriodList}
instance ToResourceProperties RestrictedPeriodsProperty where
toResourceProperties :: RestrictedPeriodsProperty -> ResourceProperties
toResourceProperties RestrictedPeriodsProperty {[RestrictedPeriodProperty]
()
haddock_workaround_ :: RestrictedPeriodsProperty -> ()
restrictedPeriodList :: RestrictedPeriodsProperty -> [RestrictedPeriodProperty]
haddock_workaround_ :: ()
restrictedPeriodList :: [RestrictedPeriodProperty]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::ConnectCampaignsV2::Campaign.RestrictedPeriods",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"RestrictedPeriodList" Key -> [RestrictedPeriodProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [RestrictedPeriodProperty]
restrictedPeriodList]}
instance JSON.ToJSON RestrictedPeriodsProperty where
toJSON :: RestrictedPeriodsProperty -> Value
toJSON RestrictedPeriodsProperty {[RestrictedPeriodProperty]
()
haddock_workaround_ :: RestrictedPeriodsProperty -> ()
restrictedPeriodList :: RestrictedPeriodsProperty -> [RestrictedPeriodProperty]
haddock_workaround_ :: ()
restrictedPeriodList :: [RestrictedPeriodProperty]
..}
= [(Key, Value)] -> Value
JSON.object [Key
"RestrictedPeriodList" Key -> [RestrictedPeriodProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [RestrictedPeriodProperty]
restrictedPeriodList]
instance Property "RestrictedPeriodList" RestrictedPeriodsProperty where
type PropertyType "RestrictedPeriodList" RestrictedPeriodsProperty = [RestrictedPeriodProperty]
set :: PropertyType "RestrictedPeriodList" RestrictedPeriodsProperty
-> RestrictedPeriodsProperty -> RestrictedPeriodsProperty
set PropertyType "RestrictedPeriodList" RestrictedPeriodsProperty
newValue RestrictedPeriodsProperty {[RestrictedPeriodProperty]
()
haddock_workaround_ :: RestrictedPeriodsProperty -> ()
restrictedPeriodList :: RestrictedPeriodsProperty -> [RestrictedPeriodProperty]
haddock_workaround_ :: ()
restrictedPeriodList :: [RestrictedPeriodProperty]
..}
= RestrictedPeriodsProperty {restrictedPeriodList :: [RestrictedPeriodProperty]
restrictedPeriodList = [RestrictedPeriodProperty]
PropertyType "RestrictedPeriodList" RestrictedPeriodsProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}