module Stratosphere.ECS.Service.ServiceConnectConfigurationProperty (
        module Exports, ServiceConnectConfigurationProperty(..),
        mkServiceConnectConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ECS.Service.LogConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.ECS.Service.ServiceConnectAccessLogConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.ECS.Service.ServiceConnectServiceProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ServiceConnectConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-service-serviceconnectconfiguration.html>
    ServiceConnectConfigurationProperty {ServiceConnectConfigurationProperty -> ()
haddock_workaround_ :: (),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-service-serviceconnectconfiguration.html#cfn-ecs-service-serviceconnectconfiguration-accesslogconfiguration>
                                         ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
accessLogConfiguration :: (Prelude.Maybe ServiceConnectAccessLogConfigurationProperty),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-service-serviceconnectconfiguration.html#cfn-ecs-service-serviceconnectconfiguration-enabled>
                                         ServiceConnectConfigurationProperty -> Value Bool
enabled :: (Value Prelude.Bool),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-service-serviceconnectconfiguration.html#cfn-ecs-service-serviceconnectconfiguration-logconfiguration>
                                         ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
logConfiguration :: (Prelude.Maybe LogConfigurationProperty),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-service-serviceconnectconfiguration.html#cfn-ecs-service-serviceconnectconfiguration-namespace>
                                         ServiceConnectConfigurationProperty -> Maybe (Value Text)
namespace :: (Prelude.Maybe (Value Prelude.Text)),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-service-serviceconnectconfiguration.html#cfn-ecs-service-serviceconnectconfiguration-services>
                                         ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
services :: (Prelude.Maybe [ServiceConnectServiceProperty])}
  deriving stock (ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty -> Bool
(ServiceConnectConfigurationProperty
 -> ServiceConnectConfigurationProperty -> Bool)
-> (ServiceConnectConfigurationProperty
    -> ServiceConnectConfigurationProperty -> Bool)
-> Eq ServiceConnectConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty -> Bool
== :: ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty -> Bool
$c/= :: ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty -> Bool
/= :: ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty -> Bool
Prelude.Eq, Int -> ServiceConnectConfigurationProperty -> ShowS
[ServiceConnectConfigurationProperty] -> ShowS
ServiceConnectConfigurationProperty -> String
(Int -> ServiceConnectConfigurationProperty -> ShowS)
-> (ServiceConnectConfigurationProperty -> String)
-> ([ServiceConnectConfigurationProperty] -> ShowS)
-> Show ServiceConnectConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ServiceConnectConfigurationProperty -> ShowS
showsPrec :: Int -> ServiceConnectConfigurationProperty -> ShowS
$cshow :: ServiceConnectConfigurationProperty -> String
show :: ServiceConnectConfigurationProperty -> String
$cshowList :: [ServiceConnectConfigurationProperty] -> ShowS
showList :: [ServiceConnectConfigurationProperty] -> ShowS
Prelude.Show)
mkServiceConnectConfigurationProperty ::
  Value Prelude.Bool -> ServiceConnectConfigurationProperty
mkServiceConnectConfigurationProperty :: Value Bool -> ServiceConnectConfigurationProperty
mkServiceConnectConfigurationProperty Value Bool
enabled
  = ServiceConnectConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), enabled :: Value Bool
enabled = Value Bool
enabled,
       accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
accessLogConfiguration = Maybe ServiceConnectAccessLogConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
       logConfiguration :: Maybe LogConfigurationProperty
logConfiguration = Maybe LogConfigurationProperty
forall a. Maybe a
Prelude.Nothing, namespace :: Maybe (Value Text)
namespace = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       services :: Maybe [ServiceConnectServiceProperty]
services = Maybe [ServiceConnectServiceProperty]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ServiceConnectConfigurationProperty where
  toResourceProperties :: ServiceConnectConfigurationProperty -> ResourceProperties
toResourceProperties ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::ECS::Service.ServiceConnectConfiguration",
         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
"Enabled" Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Bool
enabled]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> ServiceConnectAccessLogConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AccessLogConfiguration"
                                 (ServiceConnectAccessLogConfigurationProperty -> (Key, Value))
-> Maybe ServiceConnectAccessLogConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ServiceConnectAccessLogConfigurationProperty
accessLogConfiguration,
                               Key -> LogConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LogConfiguration" (LogConfigurationProperty -> (Key, Value))
-> Maybe LogConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LogConfigurationProperty
logConfiguration,
                               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
"Namespace" (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)
namespace,
                               Key -> [ServiceConnectServiceProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Services" ([ServiceConnectServiceProperty] -> (Key, Value))
-> Maybe [ServiceConnectServiceProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ServiceConnectServiceProperty]
services]))}
instance JSON.ToJSON ServiceConnectConfigurationProperty where
  toJSON :: ServiceConnectConfigurationProperty -> Value
toJSON ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = [(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
"Enabled" Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Bool
enabled]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> ServiceConnectAccessLogConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AccessLogConfiguration"
                    (ServiceConnectAccessLogConfigurationProperty -> (Key, Value))
-> Maybe ServiceConnectAccessLogConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ServiceConnectAccessLogConfigurationProperty
accessLogConfiguration,
                  Key -> LogConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LogConfiguration" (LogConfigurationProperty -> (Key, Value))
-> Maybe LogConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LogConfigurationProperty
logConfiguration,
                  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
"Namespace" (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)
namespace,
                  Key -> [ServiceConnectServiceProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Services" ([ServiceConnectServiceProperty] -> (Key, Value))
-> Maybe [ServiceConnectServiceProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ServiceConnectServiceProperty]
services])))
instance Property "AccessLogConfiguration" ServiceConnectConfigurationProperty where
  type PropertyType "AccessLogConfiguration" ServiceConnectConfigurationProperty = ServiceConnectAccessLogConfigurationProperty
  set :: PropertyType
  "AccessLogConfiguration" ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
set PropertyType
  "AccessLogConfiguration" ServiceConnectConfigurationProperty
newValue ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = ServiceConnectConfigurationProperty
        {accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
accessLogConfiguration = ServiceConnectAccessLogConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "AccessLogConfiguration" ServiceConnectConfigurationProperty
ServiceConnectAccessLogConfigurationProperty
newValue, Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ()
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
instance Property "Enabled" ServiceConnectConfigurationProperty where
  type PropertyType "Enabled" ServiceConnectConfigurationProperty = Value Prelude.Bool
  set :: PropertyType "Enabled" ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
set PropertyType "Enabled" ServiceConnectConfigurationProperty
newValue ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = ServiceConnectConfigurationProperty {enabled :: Value Bool
enabled = PropertyType "Enabled" ServiceConnectConfigurationProperty
Value Bool
newValue, Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
instance Property "LogConfiguration" ServiceConnectConfigurationProperty where
  type PropertyType "LogConfiguration" ServiceConnectConfigurationProperty = LogConfigurationProperty
  set :: PropertyType "LogConfiguration" ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
set PropertyType "LogConfiguration" ServiceConnectConfigurationProperty
newValue ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = ServiceConnectConfigurationProperty
        {logConfiguration :: Maybe LogConfigurationProperty
logConfiguration = LogConfigurationProperty -> Maybe LogConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LogConfiguration" ServiceConnectConfigurationProperty
LogConfigurationProperty
newValue, Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
instance Property "Namespace" ServiceConnectConfigurationProperty where
  type PropertyType "Namespace" ServiceConnectConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Namespace" ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
set PropertyType "Namespace" ServiceConnectConfigurationProperty
newValue ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = ServiceConnectConfigurationProperty
        {namespace :: Maybe (Value Text)
namespace = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Namespace" ServiceConnectConfigurationProperty
Value Text
newValue, Maybe [ServiceConnectServiceProperty]
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
services :: Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
services :: Maybe [ServiceConnectServiceProperty]
..}
instance Property "Services" ServiceConnectConfigurationProperty where
  type PropertyType "Services" ServiceConnectConfigurationProperty = [ServiceConnectServiceProperty]
  set :: PropertyType "Services" ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
-> ServiceConnectConfigurationProperty
set PropertyType "Services" ServiceConnectConfigurationProperty
newValue ServiceConnectConfigurationProperty {Maybe [ServiceConnectServiceProperty]
Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ServiceConnectConfigurationProperty -> ()
accessLogConfiguration :: ServiceConnectConfigurationProperty
-> Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: ServiceConnectConfigurationProperty -> Value Bool
logConfiguration :: ServiceConnectConfigurationProperty
-> Maybe LogConfigurationProperty
namespace :: ServiceConnectConfigurationProperty -> Maybe (Value Text)
services :: ServiceConnectConfigurationProperty
-> Maybe [ServiceConnectServiceProperty]
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
services :: Maybe [ServiceConnectServiceProperty]
..}
    = ServiceConnectConfigurationProperty
        {services :: Maybe [ServiceConnectServiceProperty]
services = [ServiceConnectServiceProperty]
-> Maybe [ServiceConnectServiceProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ServiceConnectServiceProperty]
PropertyType "Services" ServiceConnectConfigurationProperty
newValue, Maybe (Value Text)
Maybe LogConfigurationProperty
Maybe ServiceConnectAccessLogConfigurationProperty
()
Value Bool
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
haddock_workaround_ :: ()
accessLogConfiguration :: Maybe ServiceConnectAccessLogConfigurationProperty
enabled :: Value Bool
logConfiguration :: Maybe LogConfigurationProperty
namespace :: Maybe (Value Text)
..}