amazonka-elasticbeanstalk 0.3.4 → 0.3.5

raw patch · 5 files changed

+66/−28 lines, 5 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-elasticbeanstalk.cabal +2/−2
• gen/Network/AWS/ElasticBeanstalk/CreateEnvironment.hs +6/−2
• gen/Network/AWS/ElasticBeanstalk/TerminateEnvironment.hs +6/−2
• gen/Network/AWS/ElasticBeanstalk/Types.hs +44/−18
• gen/Network/AWS/ElasticBeanstalk/UpdateEnvironment.hs +8/−4

@@ -1,5 +1,5 @@ name:                  amazonka-elasticbeanstalk-version:               0.3.4+version:               0.3.5 synopsis:              Amazon Elastic Beanstalk SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -77,5 +77,5 @@     other-modules:      build-depends:-          amazonka-core == 0.3.4.*+          amazonka-core == 0.3.5.*         , base          >= 4.7     && < 5

@@ -288,8 +288,12 @@     , _cerTier                         = Nothing     } --- | Lists in-progress environment updates and application version deployments--- that you can cancel.+-- | Indicates if there is an in-progress environment configuration update or+-- application version deployment that you can cancel.+--+-- 'true:' There is an update in progress.+--+-- 'false:' There are no updates currently in progress. cerAbortableOperationInProgress :: Lens' CreateEnvironmentResponse (Maybe Bool) cerAbortableOperationInProgress =     lens _cerAbortableOperationInProgress

@@ -198,8 +198,12 @@     , _terTier                         = Nothing     } --- | Lists in-progress environment updates and application version deployments--- that you can cancel.+-- | Indicates if there is an in-progress environment configuration update or+-- application version deployment that you can cancel.+--+-- 'true:' There is an update in progress.+--+-- 'false:' There are no updates currently in progress. terAbortableOperationInProgress :: Lens' TerminateEnvironmentResponse (Maybe Bool) terAbortableOperationInProgress =     lens _terAbortableOperationInProgress

@@ -86,6 +86,7 @@     , configurationOptionSetting     , cosNamespace     , cosOptionName+    , cosResourceName     , cosValue      -- * ConfigurationOptionValueType@@ -119,6 +120,7 @@     , optionSpecification     , osNamespace     , osOptionName+    , osResourceName      -- * EnvironmentResourceDescription     , EnvironmentResourceDescription@@ -310,7 +312,7 @@               -> RESTError               -> Bool         check (statusCode -> s) (awsErrorCode -> e)-            | s == 400 && "Throttling" == e = True -- Throttling+            | s == 400 && (Just "Throttling") == e = True -- Throttling             | s == 500  = True -- General Server Error             | s == 509  = True -- Limit Exceeded             | s == 503  = True -- Service Unavailable@@ -693,9 +695,10 @@     parseXML = parseXMLText "ConfigurationDeploymentStatus"  data ConfigurationOptionSetting = ConfigurationOptionSetting-    { _cosNamespace  :: Maybe Text-    , _cosOptionName :: Maybe Text-    , _cosValue      :: Maybe Text+    { _cosNamespace    :: Maybe Text+    , _cosOptionName   :: Maybe Text+    , _cosResourceName :: Maybe Text+    , _cosValue        :: Maybe Text     } deriving (Eq, Ord, Read, Show)  -- | 'ConfigurationOptionSetting' constructor.@@ -706,13 +709,16 @@ -- -- * 'cosOptionName' @::@ 'Maybe' 'Text' --+-- * 'cosResourceName' @::@ 'Maybe' 'Text'+-- -- * 'cosValue' @::@ 'Maybe' 'Text' -- configurationOptionSetting :: ConfigurationOptionSetting configurationOptionSetting = ConfigurationOptionSetting-    { _cosNamespace  = Nothing-    , _cosOptionName = Nothing-    , _cosValue      = Nothing+    { _cosResourceName = Nothing+    , _cosNamespace    = Nothing+    , _cosOptionName   = Nothing+    , _cosValue        = Nothing     }  -- | A unique namespace identifying the option's associated AWS resource.@@ -723,6 +729,10 @@ cosOptionName :: Lens' ConfigurationOptionSetting (Maybe Text) cosOptionName = lens _cosOptionName (\s a -> s { _cosOptionName = a }) +-- | A unique resource name for a time-based scaling configuration option.+cosResourceName :: Lens' ConfigurationOptionSetting (Maybe Text)+cosResourceName = lens _cosResourceName (\s a -> s { _cosResourceName = a })+ -- | The current value for the configuration option. cosValue :: Lens' ConfigurationOptionSetting (Maybe Text) cosValue = lens _cosValue (\s a -> s { _cosValue = a })@@ -731,13 +741,15 @@     parseXML x = ConfigurationOptionSetting         <$> x .@? "Namespace"         <*> x .@? "OptionName"+        <*> x .@? "ResourceName"         <*> x .@? "Value"  instance ToQuery ConfigurationOptionSetting where     toQuery ConfigurationOptionSetting{..} = mconcat-        [ "Namespace"  =? _cosNamespace-        , "OptionName" =? _cosOptionName-        , "Value"      =? _cosValue+        [ "Namespace"    =? _cosNamespace+        , "OptionName"   =? _cosOptionName+        , "ResourceName" =? _cosResourceName+        , "Value"        =? _cosValue         ]  data ConfigurationOptionValueType@@ -979,8 +991,9 @@         ]  data OptionSpecification = OptionSpecification-    { _osNamespace  :: Maybe Text-    , _osOptionName :: Maybe Text+    { _osNamespace    :: Maybe Text+    , _osOptionName   :: Maybe Text+    , _osResourceName :: Maybe Text     } deriving (Eq, Ord, Read, Show)  -- | 'OptionSpecification' constructor.@@ -991,10 +1004,13 @@ -- -- * 'osOptionName' @::@ 'Maybe' 'Text' --+-- * 'osResourceName' @::@ 'Maybe' 'Text'+-- optionSpecification :: OptionSpecification optionSpecification = OptionSpecification-    { _osNamespace  = Nothing-    , _osOptionName = Nothing+    { _osResourceName = Nothing+    , _osNamespace    = Nothing+    , _osOptionName   = Nothing     }  -- | A unique namespace identifying the option's associated AWS resource.@@ -1005,15 +1021,21 @@ osOptionName :: Lens' OptionSpecification (Maybe Text) osOptionName = lens _osOptionName (\s a -> s { _osOptionName = a }) +-- | A unique resource name for a time-based scaling configuration option.+osResourceName :: Lens' OptionSpecification (Maybe Text)+osResourceName = lens _osResourceName (\s a -> s { _osResourceName = a })+ instance FromXML OptionSpecification where     parseXML x = OptionSpecification         <$> x .@? "Namespace"         <*> x .@? "OptionName"+        <*> x .@? "ResourceName"  instance ToQuery OptionSpecification where     toQuery OptionSpecification{..} = mconcat-        [ "Namespace"  =? _osNamespace-        , "OptionName" =? _osOptionName+        [ "Namespace"    =? _osNamespace+        , "OptionName"   =? _osOptionName+        , "ResourceName" =? _osResourceName         ]  data EnvironmentResourceDescription = EnvironmentResourceDescription@@ -1944,8 +1966,12 @@     , _ed1Tier                         = Nothing     } --- | Lists in-progress environment updates and application version deployments--- that you can cancel.+-- | Indicates if there is an in-progress environment configuration update or+-- application version deployment that you can cancel.+--+-- 'true:' There is an update in progress.+--+-- 'false:' There are no updates currently in progress. ed1AbortableOperationInProgress :: Lens' EnvironmentDescription (Maybe Bool) ed1AbortableOperationInProgress =     lens _ed1AbortableOperationInProgress

@@ -176,8 +176,8 @@  -- | This specifies the tier to use to update the environment. ----- Condition: You can only update the tier version for an environment. If you--- change the name of the type, AWS Elastic Beanstalk returns 'InvalidParameterValue' error.+-- Condition: At this time, if you change the tier version, name, or type, AWS+-- Elastic Beanstalk returns 'InvalidParameterValue' error. ueTier :: Lens' UpdateEnvironment (Maybe EnvironmentTier) ueTier = lens _ueTier (\s a -> s { _ueTier = a }) @@ -262,8 +262,12 @@     , _uerTier                         = Nothing     } --- | Lists in-progress environment updates and application version deployments--- that you can cancel.+-- | Indicates if there is an in-progress environment configuration update or+-- application version deployment that you can cancel.+--+-- 'true:' There is an update in progress.+--+-- 'false:' There are no updates currently in progress. uerAbortableOperationInProgress :: Lens' UpdateEnvironmentResponse (Maybe Bool) uerAbortableOperationInProgress =     lens _uerAbortableOperationInProgress