stratosphere-codebuild-1.0.0: gen/Stratosphere/CodeBuild/Project/GitSubmodulesConfigProperty.hs

module Stratosphere.CodeBuild.Project.GitSubmodulesConfigProperty (
        GitSubmodulesConfigProperty(..), mkGitSubmodulesConfigProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data GitSubmodulesConfigProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-gitsubmodulesconfig.html>
    GitSubmodulesConfigProperty {haddock_workaround_ :: (),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-gitsubmodulesconfig.html#cfn-codebuild-project-gitsubmodulesconfig-fetchsubmodules>
                                 fetchSubmodules :: (Value Prelude.Bool)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkGitSubmodulesConfigProperty ::
  Value Prelude.Bool -> GitSubmodulesConfigProperty
mkGitSubmodulesConfigProperty fetchSubmodules
  = GitSubmodulesConfigProperty
      {haddock_workaround_ = (), fetchSubmodules = fetchSubmodules}
instance ToResourceProperties GitSubmodulesConfigProperty where
  toResourceProperties GitSubmodulesConfigProperty {..}
    = ResourceProperties
        {awsType = "AWS::CodeBuild::Project.GitSubmodulesConfig",
         supportsTags = Prelude.False,
         properties = ["FetchSubmodules" JSON..= fetchSubmodules]}
instance JSON.ToJSON GitSubmodulesConfigProperty where
  toJSON GitSubmodulesConfigProperty {..}
    = JSON.object ["FetchSubmodules" JSON..= fetchSubmodules]
instance Property "FetchSubmodules" GitSubmodulesConfigProperty where
  type PropertyType "FetchSubmodules" GitSubmodulesConfigProperty = Value Prelude.Bool
  set newValue GitSubmodulesConfigProperty {..}
    = GitSubmodulesConfigProperty {fetchSubmodules = newValue, ..}