stratosphere 0.1.3 → 0.1.4

raw patch · 5 files changed

+35/−3 lines, 5 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

Files

• CHANGELOG.md +5/−0
• library-gen/Stratosphere/Resources/Group.hs +11/−2
• library-gen/Stratosphere/Resources/IAMRole.hs +9/−0
• library-gen/Stratosphere/Resources/User.hs +9/−0
• stratosphere.cabal +1/−1

@@ -1,5 +1,10 @@ # Change Log +## 0.1.4++* Added `UserName` property to the IAM User resource. (Thanks @timmytofu!)+* Added IAM Group and Role name parameters. (Thanks again @timmytofu!)+ ## 0.1.3  * Update `aeson-pretty` to version 0.8 so we can stay in stackage nightly.

@@ -20,7 +20,8 @@ -- constructor. data Group =   Group-  { _groupManagedPolicyArns :: Maybe [Val Text]+  { _groupGroupName :: Maybe (Val Text)+  , _groupManagedPolicyArns :: Maybe [Val Text]   , _groupPath :: Maybe (Val Text)   , _groupPolicies :: Maybe [IAMPolicies]   } deriving (Show, Generic)@@ -36,10 +37,18 @@   :: Group group  =   Group-  { _groupManagedPolicyArns = Nothing+  { _groupGroupName = Nothing+  , _groupManagedPolicyArns = Nothing   , _groupPath = Nothing   , _groupPolicies = Nothing   }++-- | A name for the IAM group. For valid values, see the GroupName parameter+-- for the CreateGroup action in the IAM API Reference. If you don't specify a+-- name, AWS CloudFormation generates a unique physical ID and uses that ID+-- for the group name.+gGroupName :: Lens' Group (Maybe (Val Text))+gGroupName = lens _groupGroupName (\s a -> s { _groupGroupName = a })  -- | One or more managed policy ARNs to attach to this group. gManagedPolicyArns :: Lens' Group (Maybe [Val Text])

@@ -26,6 +26,7 @@   , _iAMRoleManagedPolicyArns :: Maybe [Val Text]   , _iAMRolePath :: Maybe (Val Text)   , _iAMRolePolicies :: Maybe [IAMPolicies]+  , _iAMRoleRoleName :: Maybe (Val Text)   } deriving (Show, Generic)  instance ToJSON IAMRole where@@ -44,6 +45,7 @@   , _iAMRoleManagedPolicyArns = Nothing   , _iAMRolePath = Nothing   , _iAMRolePolicies = Nothing+  , _iAMRoleRoleName = Nothing   }  -- | The IAM assume role policy that is associated with this role.@@ -74,3 +76,10 @@ -- policy is deleted. iamrPolicies :: Lens' IAMRole (Maybe [IAMPolicies]) iamrPolicies = lens _iAMRolePolicies (\s a -> s { _iAMRolePolicies = a })++-- | A name for the IAM role. For valid values, see the RoleName parameter for+-- the CreateRole action in the IAM API Reference. If you don't specify a+-- name, AWS CloudFormation generates a unique physical ID and uses that ID+-- for the role name.+iamrRoleName :: Lens' IAMRole (Maybe (Val Text))+iamrRoleName = lens _iAMRoleRoleName (\s a -> s { _iAMRoleRoleName = a })

@@ -24,6 +24,7 @@   , _userManagedPolicyArns :: Maybe [Val Text]   , _userPath :: Maybe (Val Text)   , _userPolicies :: Maybe [IAMPolicies]+  , _userUserName :: Maybe (Val Text)   } deriving (Show, Generic)  instance ToJSON User where@@ -42,6 +43,7 @@   , _userManagedPolicyArns = Nothing   , _userPath = Nothing   , _userPolicies = Nothing+  , _userUserName = Nothing   }  -- | A name of a group to which you want to add the user.@@ -68,3 +70,10 @@ -- to the IAM user will fail. uPolicies :: Lens' User (Maybe [IAMPolicies]) uPolicies = lens _userPolicies (\s a -> s { _userPolicies = a })++-- | A name for the IAM user. For valid values, see the UserName parameter for+-- the CreateUser action in the IAM API Reference. If you don't specify a+-- name, AWS CloudFormation generates a unique physical ID and uses that ID+-- for the group name.+uUserName :: Lens' User (Maybe (Val Text))+uUserName = lens _userUserName (\s a -> s { _userUserName = a })

@@ -3,7 +3,7 @@ -- see: https://github.com/sol/hpack  name:           stratosphere-version:        0.1.3+version:        0.1.4 synopsis:       EDSL for AWS CloudFormation description:    EDSL for AWS CloudFormation category:       AWS, Cloud