module Stratosphere.Backup.BackupVault (
        module Exports, BackupVault(..), mkBackupVault
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Backup.BackupVault.LockConfigurationTypeProperty as Exports
import {-# SOURCE #-} Stratosphere.Backup.BackupVault.NotificationObjectTypeProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data BackupVault
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html>
    BackupVault {BackupVault -> ()
haddock_workaround_ :: (),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html#cfn-backup-backupvault-accesspolicy>
                 BackupVault -> Maybe Object
accessPolicy :: (Prelude.Maybe JSON.Object),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html#cfn-backup-backupvault-backupvaultname>
                 BackupVault -> Value Text
backupVaultName :: (Value Prelude.Text),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html#cfn-backup-backupvault-backupvaulttags>
                 BackupVault -> Maybe (Map Text (Value Text))
backupVaultTags :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html#cfn-backup-backupvault-encryptionkeyarn>
                 BackupVault -> Maybe (Value Text)
encryptionKeyArn :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html#cfn-backup-backupvault-lockconfiguration>
                 BackupVault -> Maybe LockConfigurationTypeProperty
lockConfiguration :: (Prelude.Maybe LockConfigurationTypeProperty),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-backup-backupvault.html#cfn-backup-backupvault-notifications>
                 BackupVault -> Maybe NotificationObjectTypeProperty
notifications :: (Prelude.Maybe NotificationObjectTypeProperty)}
  deriving stock (BackupVault -> BackupVault -> Bool
(BackupVault -> BackupVault -> Bool)
-> (BackupVault -> BackupVault -> Bool) -> Eq BackupVault
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BackupVault -> BackupVault -> Bool
== :: BackupVault -> BackupVault -> Bool
$c/= :: BackupVault -> BackupVault -> Bool
/= :: BackupVault -> BackupVault -> Bool
Prelude.Eq, Int -> BackupVault -> ShowS
[BackupVault] -> ShowS
BackupVault -> String
(Int -> BackupVault -> ShowS)
-> (BackupVault -> String)
-> ([BackupVault] -> ShowS)
-> Show BackupVault
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> BackupVault -> ShowS
showsPrec :: Int -> BackupVault -> ShowS
$cshow :: BackupVault -> String
show :: BackupVault -> String
$cshowList :: [BackupVault] -> ShowS
showList :: [BackupVault] -> ShowS
Prelude.Show)
mkBackupVault :: Value Prelude.Text -> BackupVault
mkBackupVault :: Value Text -> BackupVault
mkBackupVault Value Text
backupVaultName
  = BackupVault
      {haddock_workaround_ :: ()
haddock_workaround_ = (), backupVaultName :: Value Text
backupVaultName = Value Text
backupVaultName,
       accessPolicy :: Maybe Object
accessPolicy = Maybe Object
forall a. Maybe a
Prelude.Nothing, backupVaultTags :: Maybe (Map Text (Value Text))
backupVaultTags = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       encryptionKeyArn :: Maybe (Value Text)
encryptionKeyArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       lockConfiguration :: Maybe LockConfigurationTypeProperty
lockConfiguration = Maybe LockConfigurationTypeProperty
forall a. Maybe a
Prelude.Nothing,
       notifications :: Maybe NotificationObjectTypeProperty
notifications = Maybe NotificationObjectTypeProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties BackupVault where
  toResourceProperties :: BackupVault -> ResourceProperties
toResourceProperties BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Backup::BackupVault",
         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
"BackupVaultName" 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
backupVaultName]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AccessPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
accessPolicy,
                               Key -> Map Text (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
"BackupVaultTags" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
backupVaultTags,
                               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
"EncryptionKeyArn" (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)
encryptionKeyArn,
                               Key -> LockConfigurationTypeProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LockConfiguration" (LockConfigurationTypeProperty -> (Key, Value))
-> Maybe LockConfigurationTypeProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LockConfigurationTypeProperty
lockConfiguration,
                               Key -> NotificationObjectTypeProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Notifications" (NotificationObjectTypeProperty -> (Key, Value))
-> Maybe NotificationObjectTypeProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NotificationObjectTypeProperty
notifications]))}
instance JSON.ToJSON BackupVault where
  toJSON :: BackupVault -> Value
toJSON BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = [(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
"BackupVaultName" 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
backupVaultName]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AccessPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
accessPolicy,
                  Key -> Map Text (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
"BackupVaultTags" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
backupVaultTags,
                  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
"EncryptionKeyArn" (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)
encryptionKeyArn,
                  Key -> LockConfigurationTypeProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LockConfiguration" (LockConfigurationTypeProperty -> (Key, Value))
-> Maybe LockConfigurationTypeProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LockConfigurationTypeProperty
lockConfiguration,
                  Key -> NotificationObjectTypeProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Notifications" (NotificationObjectTypeProperty -> (Key, Value))
-> Maybe NotificationObjectTypeProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NotificationObjectTypeProperty
notifications])))
instance Property "AccessPolicy" BackupVault where
  type PropertyType "AccessPolicy" BackupVault = JSON.Object
  set :: PropertyType "AccessPolicy" BackupVault
-> BackupVault -> BackupVault
set PropertyType "AccessPolicy" BackupVault
newValue BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = BackupVault {accessPolicy :: Maybe Object
accessPolicy = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "AccessPolicy" BackupVault
newValue, Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: ()
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
instance Property "BackupVaultName" BackupVault where
  type PropertyType "BackupVaultName" BackupVault = Value Prelude.Text
  set :: PropertyType "BackupVaultName" BackupVault
-> BackupVault -> BackupVault
set PropertyType "BackupVaultName" BackupVault
newValue BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = BackupVault {backupVaultName :: Value Text
backupVaultName = PropertyType "BackupVaultName" BackupVault
Value Text
newValue, Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
instance Property "BackupVaultTags" BackupVault where
  type PropertyType "BackupVaultTags" BackupVault = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "BackupVaultTags" BackupVault
-> BackupVault -> BackupVault
set PropertyType "BackupVaultTags" BackupVault
newValue BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = BackupVault {backupVaultTags :: Maybe (Map Text (Value Text))
backupVaultTags = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "BackupVaultTags" BackupVault
newValue, Maybe Object
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
instance Property "EncryptionKeyArn" BackupVault where
  type PropertyType "EncryptionKeyArn" BackupVault = Value Prelude.Text
  set :: PropertyType "EncryptionKeyArn" BackupVault
-> BackupVault -> BackupVault
set PropertyType "EncryptionKeyArn" BackupVault
newValue BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = BackupVault {encryptionKeyArn :: Maybe (Value Text)
encryptionKeyArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EncryptionKeyArn" BackupVault
Value Text
newValue, Maybe Object
Maybe (Map Text (Value Text))
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
instance Property "LockConfiguration" BackupVault where
  type PropertyType "LockConfiguration" BackupVault = LockConfigurationTypeProperty
  set :: PropertyType "LockConfiguration" BackupVault
-> BackupVault -> BackupVault
set PropertyType "LockConfiguration" BackupVault
newValue BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = BackupVault {lockConfiguration :: Maybe LockConfigurationTypeProperty
lockConfiguration = LockConfigurationTypeProperty
-> Maybe LockConfigurationTypeProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LockConfiguration" BackupVault
LockConfigurationTypeProperty
newValue, Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
notifications :: Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
notifications :: Maybe NotificationObjectTypeProperty
..}
instance Property "Notifications" BackupVault where
  type PropertyType "Notifications" BackupVault = NotificationObjectTypeProperty
  set :: PropertyType "Notifications" BackupVault
-> BackupVault -> BackupVault
set PropertyType "Notifications" BackupVault
newValue BackupVault {Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
Maybe NotificationObjectTypeProperty
()
Value Text
haddock_workaround_ :: BackupVault -> ()
accessPolicy :: BackupVault -> Maybe Object
backupVaultName :: BackupVault -> Value Text
backupVaultTags :: BackupVault -> Maybe (Map Text (Value Text))
encryptionKeyArn :: BackupVault -> Maybe (Value Text)
lockConfiguration :: BackupVault -> Maybe LockConfigurationTypeProperty
notifications :: BackupVault -> Maybe NotificationObjectTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
notifications :: Maybe NotificationObjectTypeProperty
..}
    = BackupVault {notifications :: Maybe NotificationObjectTypeProperty
notifications = NotificationObjectTypeProperty
-> Maybe NotificationObjectTypeProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Notifications" BackupVault
NotificationObjectTypeProperty
newValue, Maybe Object
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe LockConfigurationTypeProperty
()
Value Text
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
haddock_workaround_ :: ()
accessPolicy :: Maybe Object
backupVaultName :: Value Text
backupVaultTags :: Maybe (Map Text (Value Text))
encryptionKeyArn :: Maybe (Value Text)
lockConfiguration :: Maybe LockConfigurationTypeProperty
..}