module Stratosphere.SSMGuiConnect.Preferences.S3BucketProperty ( S3BucketProperty(..), mkS3BucketProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data S3BucketProperty = -- | See: S3BucketProperty {haddock_workaround_ :: (), -- | See: bucketName :: (Value Prelude.Text), -- | See: bucketOwner :: (Value Prelude.Text)} deriving stock (Prelude.Eq, Prelude.Show) mkS3BucketProperty :: Value Prelude.Text -> Value Prelude.Text -> S3BucketProperty mkS3BucketProperty bucketName bucketOwner = S3BucketProperty {haddock_workaround_ = (), bucketName = bucketName, bucketOwner = bucketOwner} instance ToResourceProperties S3BucketProperty where toResourceProperties S3BucketProperty {..} = ResourceProperties {awsType = "AWS::SSMGuiConnect::Preferences.S3Bucket", supportsTags = Prelude.False, properties = ["BucketName" JSON..= bucketName, "BucketOwner" JSON..= bucketOwner]} instance JSON.ToJSON S3BucketProperty where toJSON S3BucketProperty {..} = JSON.object ["BucketName" JSON..= bucketName, "BucketOwner" JSON..= bucketOwner] instance Property "BucketName" S3BucketProperty where type PropertyType "BucketName" S3BucketProperty = Value Prelude.Text set newValue S3BucketProperty {..} = S3BucketProperty {bucketName = newValue, ..} instance Property "BucketOwner" S3BucketProperty where type PropertyType "BucketOwner" S3BucketProperty = Value Prelude.Text set newValue S3BucketProperty {..} = S3BucketProperty {bucketOwner = newValue, ..}