amazonka-lambda 1.2.0.2 → 1.3.0

raw patch · 19 files changed

+130/−130 lines, 19 filesdep ~amazonka-coredep ~amazonka-lambdadep ~amazonka-testPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core, amazonka-lambda, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-lambda.cabal +5/−5
• gen/Network/AWS/Lambda.hs +5/−5
• gen/Network/AWS/Lambda/AddPermission.hs +9/−9
• gen/Network/AWS/Lambda/CreateEventSourceMapping.hs +1/−1
• gen/Network/AWS/Lambda/CreateFunction.hs +1/−1
• gen/Network/AWS/Lambda/DeleteEventSourceMapping.hs +1/−1
• gen/Network/AWS/Lambda/GetEventSourceMapping.hs +1/−1
• gen/Network/AWS/Lambda/GetFunction.hs +10/−10
• gen/Network/AWS/Lambda/GetFunctionConfiguration.hs +1/−1
• gen/Network/AWS/Lambda/GetPolicy.hs +9/−9
• gen/Network/AWS/Lambda/ListEventSourceMappings.hs +19/−19
• gen/Network/AWS/Lambda/ListFunctions.hs +23/−23
• gen/Network/AWS/Lambda/Types.hs +2/−2
• gen/Network/AWS/Lambda/Types/Product.hs +22/−22
• gen/Network/AWS/Lambda/UpdateEventSourceMapping.hs +1/−1
• gen/Network/AWS/Lambda/UpdateFunctionCode.hs +1/−1
• gen/Network/AWS/Lambda/UpdateFunctionConfiguration.hs +1/−1
• test/Test/AWS/Gen/Lambda.hs +17/−17

@@ -8,7 +8,7 @@  ## Version -`1.2.0.2`+`1.3.0`   ## Description

@@ -1,5 +1,5 @@ name:                  amazonka-lambda-version:               1.2.0.2+version:               1.3.0 synopsis:              Amazon Lambda SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -74,7 +74,7 @@         , Network.AWS.Lambda.Types.Sum      build-depends:-          amazonka-core == 1.2.0.*+          amazonka-core == 1.3.0.*         , base          >= 4.7     && < 5  test-suite amazonka-lambda-test@@ -94,9 +94,9 @@         , Test.AWS.Lambda.Internal      build-depends:-          amazonka-core == 1.2.0.*-        , amazonka-test == 1.2.0.*-        , amazonka-lambda == 1.2.0.*+          amazonka-core == 1.3.0.*+        , amazonka-test == 1.3.0.*+        , amazonka-lambda == 1.3.0.*         , base         , bytestring         , lens

@@ -70,12 +70,12 @@     -- ** GetFunctionConfiguration     , module Network.AWS.Lambda.GetFunctionConfiguration -    -- ** UpdateEventSourceMapping-    , module Network.AWS.Lambda.UpdateEventSourceMapping-     -- ** DeleteEventSourceMapping     , module Network.AWS.Lambda.DeleteEventSourceMapping +    -- ** UpdateEventSourceMapping+    , module Network.AWS.Lambda.UpdateEventSourceMapping+     -- ** RemovePermission     , module Network.AWS.Lambda.RemovePermission @@ -133,8 +133,8 @@     , EventSourceMappingConfiguration     , eventSourceMappingConfiguration     , esmcEventSourceARN-    , esmcFunctionARN     , esmcState+    , esmcFunctionARN     , esmcUUId     , esmcLastProcessingResult     , esmcBatchSize@@ -158,8 +158,8 @@     -- ** FunctionConfiguration     , FunctionConfiguration     , functionConfiguration-    , fcRuntime     , fcMemorySize+    , fcRuntime     , fcFunctionARN     , fcRole     , fcFunctionName

@@ -50,7 +50,7 @@     , AddPermissionResponse     -- * Response Lenses     , aprsStatement-    , aprsStatus+    , aprsResponseStatus     ) where  import           Network.AWS.Lambda.Types@@ -189,8 +189,8 @@  -- | /See:/ 'addPermissionResponse' smart constructor. data AddPermissionResponse = AddPermissionResponse'-    { _aprsStatement :: !(Maybe Text)-    , _aprsStatus    :: !Int+    { _aprsStatement      :: !(Maybe Text)+    , _aprsResponseStatus :: !Int     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'AddPermissionResponse' with the minimum fields required to make a request.@@ -199,14 +199,14 @@ -- -- * 'aprsStatement' ----- * 'aprsStatus'+-- * 'aprsResponseStatus' addPermissionResponse-    :: Int -- ^ 'aprsStatus'+    :: Int -- ^ 'aprsResponseStatus'     -> AddPermissionResponse-addPermissionResponse pStatus_ =+addPermissionResponse pResponseStatus_ =     AddPermissionResponse'     { _aprsStatement = Nothing-    , _aprsStatus = pStatus_+    , _aprsResponseStatus = pResponseStatus_     }  -- | The permission statement you specified in the request. The response@@ -216,5 +216,5 @@ aprsStatement = lens _aprsStatement (\ s a -> s{_aprsStatement = a});  -- | The response status code.-aprsStatus :: Lens' AddPermissionResponse Int-aprsStatus = lens _aprsStatus (\ s a -> s{_aprsStatus = a});+aprsResponseStatus :: Lens' AddPermissionResponse Int+aprsResponseStatus = lens _aprsResponseStatus (\ s a -> s{_aprsResponseStatus = a});

@@ -57,8 +57,8 @@     , EventSourceMappingConfiguration     -- * Response Lenses     , esmcEventSourceARN-    , esmcFunctionARN     , esmcState+    , esmcFunctionARN     , esmcUUId     , esmcLastProcessingResult     , esmcBatchSize

@@ -46,8 +46,8 @@     , functionConfiguration     , FunctionConfiguration     -- * Response Lenses-    , fcRuntime     , fcMemorySize+    , fcRuntime     , fcFunctionARN     , fcRole     , fcFunctionName

@@ -38,8 +38,8 @@     , EventSourceMappingConfiguration     -- * Response Lenses     , esmcEventSourceARN-    , esmcFunctionARN     , esmcState+    , esmcFunctionARN     , esmcUUId     , esmcLastProcessingResult     , esmcBatchSize

@@ -38,8 +38,8 @@     , EventSourceMappingConfiguration     -- * Response Lenses     , esmcEventSourceARN-    , esmcFunctionARN     , esmcState+    , esmcFunctionARN     , esmcUUId     , esmcLastProcessingResult     , esmcBatchSize

@@ -41,7 +41,7 @@     -- * Response Lenses     , gfrsCode     , gfrsConfiguration-    , gfrsStatus+    , gfrsResponseStatus     ) where  import           Network.AWS.Lambda.Types@@ -108,9 +108,9 @@ -- -- /See:/ 'getFunctionResponse' smart constructor. data GetFunctionResponse = GetFunctionResponse'-    { _gfrsCode          :: !(Maybe FunctionCodeLocation)-    , _gfrsConfiguration :: !(Maybe FunctionConfiguration)-    , _gfrsStatus        :: !Int+    { _gfrsCode           :: !(Maybe FunctionCodeLocation)+    , _gfrsConfiguration  :: !(Maybe FunctionConfiguration)+    , _gfrsResponseStatus :: !Int     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'GetFunctionResponse' with the minimum fields required to make a request.@@ -121,15 +121,15 @@ -- -- * 'gfrsConfiguration' ----- * 'gfrsStatus'+-- * 'gfrsResponseStatus' getFunctionResponse-    :: Int -- ^ 'gfrsStatus'+    :: Int -- ^ 'gfrsResponseStatus'     -> GetFunctionResponse-getFunctionResponse pStatus_ =+getFunctionResponse pResponseStatus_ =     GetFunctionResponse'     { _gfrsCode = Nothing     , _gfrsConfiguration = Nothing-    , _gfrsStatus = pStatus_+    , _gfrsResponseStatus = pResponseStatus_     }  -- | Undocumented member.@@ -141,5 +141,5 @@ gfrsConfiguration = lens _gfrsConfiguration (\ s a -> s{_gfrsConfiguration = a});  -- | The response status code.-gfrsStatus :: Lens' GetFunctionResponse Int-gfrsStatus = lens _gfrsStatus (\ s a -> s{_gfrsStatus = a});+gfrsResponseStatus :: Lens' GetFunctionResponse Int+gfrsResponseStatus = lens _gfrsResponseStatus (\ s a -> s{_gfrsResponseStatus = a});

@@ -38,8 +38,8 @@     , functionConfiguration     , FunctionConfiguration     -- * Response Lenses-    , fcRuntime     , fcMemorySize+    , fcRuntime     , fcFunctionARN     , fcRole     , fcFunctionName

@@ -37,7 +37,7 @@     , GetPolicyResponse     -- * Response Lenses     , gprsPolicy-    , gprsStatus+    , gprsResponseStatus     ) where  import           Network.AWS.Lambda.Types@@ -100,8 +100,8 @@  -- | /See:/ 'getPolicyResponse' smart constructor. data GetPolicyResponse = GetPolicyResponse'-    { _gprsPolicy :: !(Maybe Text)-    , _gprsStatus :: !Int+    { _gprsPolicy         :: !(Maybe Text)+    , _gprsResponseStatus :: !Int     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'GetPolicyResponse' with the minimum fields required to make a request.@@ -110,14 +110,14 @@ -- -- * 'gprsPolicy' ----- * 'gprsStatus'+-- * 'gprsResponseStatus' getPolicyResponse-    :: Int -- ^ 'gprsStatus'+    :: Int -- ^ 'gprsResponseStatus'     -> GetPolicyResponse-getPolicyResponse pStatus_ =+getPolicyResponse pResponseStatus_ =     GetPolicyResponse'     { _gprsPolicy = Nothing-    , _gprsStatus = pStatus_+    , _gprsResponseStatus = pResponseStatus_     }  -- | The access policy associated with the specified function. The response@@ -127,5 +127,5 @@ gprsPolicy = lens _gprsPolicy (\ s a -> s{_gprsPolicy = a});  -- | The response status code.-gprsStatus :: Lens' GetPolicyResponse Int-gprsStatus = lens _gprsStatus (\ s a -> s{_gprsStatus = a});+gprsResponseStatus :: Lens' GetPolicyResponse Int+gprsResponseStatus = lens _gprsResponseStatus (\ s a -> s{_gprsResponseStatus = a});

@@ -39,8 +39,8 @@     , ListEventSourceMappings     -- * Request Lenses     , lesmEventSourceARN-    , lesmMaxItems     , lesmMarker+    , lesmMaxItems     , lesmFunctionName      -- * Destructuring the Response@@ -49,7 +49,7 @@     -- * Response Lenses     , lesmrsEventSourceMappings     , lesmrsNextMarker-    , lesmrsStatus+    , lesmrsResponseStatus     ) where  import           Network.AWS.Lambda.Types@@ -62,8 +62,8 @@ -- | /See:/ 'listEventSourceMappings' smart constructor. data ListEventSourceMappings = ListEventSourceMappings'     { _lesmEventSourceARN :: !(Maybe Text)-    , _lesmMaxItems       :: !(Maybe Nat)     , _lesmMarker         :: !(Maybe Text)+    , _lesmMaxItems       :: !(Maybe Nat)     , _lesmFunctionName   :: !(Maybe Text)     } deriving (Eq,Read,Show,Data,Typeable,Generic) @@ -73,18 +73,18 @@ -- -- * 'lesmEventSourceARN' ----- * 'lesmMaxItems'--- -- * 'lesmMarker' --+-- * 'lesmMaxItems'+-- -- * 'lesmFunctionName' listEventSourceMappings     :: ListEventSourceMappings listEventSourceMappings =     ListEventSourceMappings'     { _lesmEventSourceARN = Nothing-    , _lesmMaxItems = Nothing     , _lesmMarker = Nothing+    , _lesmMaxItems = Nothing     , _lesmFunctionName = Nothing     } @@ -92,17 +92,17 @@ lesmEventSourceARN :: Lens' ListEventSourceMappings (Maybe Text) lesmEventSourceARN = lens _lesmEventSourceARN (\ s a -> s{_lesmEventSourceARN = a}); --- | Optional integer. Specifies the maximum number of event sources to--- return in response. This value must be greater than 0.-lesmMaxItems :: Lens' ListEventSourceMappings (Maybe Natural)-lesmMaxItems = lens _lesmMaxItems (\ s a -> s{_lesmMaxItems = a}) . mapping _Nat;- -- | Optional string. An opaque pagination token returned from a previous -- 'ListEventSourceMappings' operation. If present, specifies to continue -- the list from where the returning call left off. lesmMarker :: Lens' ListEventSourceMappings (Maybe Text) lesmMarker = lens _lesmMarker (\ s a -> s{_lesmMarker = a}); +-- | Optional integer. Specifies the maximum number of event sources to+-- return in response. This value must be greater than 0.+lesmMaxItems :: Lens' ListEventSourceMappings (Maybe Natural)+lesmMaxItems = lens _lesmMaxItems (\ s a -> s{_lesmMaxItems = a}) . mapping _Nat;+ -- | The name of the Lambda function. -- -- You can specify an unqualified function name (for example,@@ -145,7 +145,7 @@         toQuery ListEventSourceMappings'{..}           = mconcat               ["EventSourceArn" =: _lesmEventSourceARN,-               "MaxItems" =: _lesmMaxItems, "Marker" =: _lesmMarker,+               "Marker" =: _lesmMarker, "MaxItems" =: _lesmMaxItems,                "FunctionName" =: _lesmFunctionName]  -- | Contains a list of event sources (see@@ -155,7 +155,7 @@ data ListEventSourceMappingsResponse = ListEventSourceMappingsResponse'     { _lesmrsEventSourceMappings :: !(Maybe [EventSourceMappingConfiguration])     , _lesmrsNextMarker          :: !(Maybe Text)-    , _lesmrsStatus              :: !Int+    , _lesmrsResponseStatus      :: !Int     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'ListEventSourceMappingsResponse' with the minimum fields required to make a request.@@ -166,15 +166,15 @@ -- -- * 'lesmrsNextMarker' ----- * 'lesmrsStatus'+-- * 'lesmrsResponseStatus' listEventSourceMappingsResponse-    :: Int -- ^ 'lesmrsStatus'+    :: Int -- ^ 'lesmrsResponseStatus'     -> ListEventSourceMappingsResponse-listEventSourceMappingsResponse pStatus_ =+listEventSourceMappingsResponse pResponseStatus_ =     ListEventSourceMappingsResponse'     { _lesmrsEventSourceMappings = Nothing     , _lesmrsNextMarker = Nothing-    , _lesmrsStatus = pStatus_+    , _lesmrsResponseStatus = pResponseStatus_     }  -- | An array of 'EventSourceMappingConfiguration' objects.@@ -186,5 +186,5 @@ lesmrsNextMarker = lens _lesmrsNextMarker (\ s a -> s{_lesmrsNextMarker = a});  -- | The response status code.-lesmrsStatus :: Lens' ListEventSourceMappingsResponse Int-lesmrsStatus = lens _lesmrsStatus (\ s a -> s{_lesmrsStatus = a});+lesmrsResponseStatus :: Lens' ListEventSourceMappingsResponse Int+lesmrsResponseStatus = lens _lesmrsResponseStatus (\ s a -> s{_lesmrsResponseStatus = a});

@@ -34,8 +34,8 @@       listFunctions     , ListFunctions     -- * Request Lenses-    , lfMaxItems     , lfMarker+    , lfMaxItems      -- * Destructuring the Response     , listFunctionsResponse@@ -43,7 +43,7 @@     -- * Response Lenses     , lfrsNextMarker     , lfrsFunctions-    , lfrsStatus+    , lfrsResponseStatus     ) where  import           Network.AWS.Lambda.Types@@ -55,36 +55,36 @@  -- | /See:/ 'listFunctions' smart constructor. data ListFunctions = ListFunctions'-    { _lfMaxItems :: !(Maybe Nat)-    , _lfMarker   :: !(Maybe Text)+    { _lfMarker   :: !(Maybe Text)+    , _lfMaxItems :: !(Maybe Nat)     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'ListFunctions' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'lfMaxItems'--- -- * 'lfMarker'+--+-- * 'lfMaxItems' listFunctions     :: ListFunctions listFunctions =     ListFunctions'-    { _lfMaxItems = Nothing-    , _lfMarker = Nothing+    { _lfMarker = Nothing+    , _lfMaxItems = Nothing     } --- | Optional integer. Specifies the maximum number of AWS Lambda functions--- to return in response. This parameter value must be greater than 0.-lfMaxItems :: Lens' ListFunctions (Maybe Natural)-lfMaxItems = lens _lfMaxItems (\ s a -> s{_lfMaxItems = a}) . mapping _Nat;- -- | Optional string. An opaque pagination token returned from a previous -- 'ListFunctions' operation. If present, indicates where to continue the -- listing. lfMarker :: Lens' ListFunctions (Maybe Text) lfMarker = lens _lfMarker (\ s a -> s{_lfMarker = a}); +-- | Optional integer. Specifies the maximum number of AWS Lambda functions+-- to return in response. This parameter value must be greater than 0.+lfMaxItems :: Lens' ListFunctions (Maybe Natural)+lfMaxItems = lens _lfMaxItems (\ s a -> s{_lfMaxItems = a}) . mapping _Nat;+ instance AWSPager ListFunctions where         page rq rs           | stop (rs ^. lfrsNextMarker) = Nothing@@ -112,16 +112,16 @@ instance ToQuery ListFunctions where         toQuery ListFunctions'{..}           = mconcat-              ["MaxItems" =: _lfMaxItems, "Marker" =: _lfMarker]+              ["Marker" =: _lfMarker, "MaxItems" =: _lfMaxItems]  -- | Contains a list of AWS Lambda function configurations (see -- FunctionConfiguration. -- -- /See:/ 'listFunctionsResponse' smart constructor. data ListFunctionsResponse = ListFunctionsResponse'-    { _lfrsNextMarker :: !(Maybe Text)-    , _lfrsFunctions  :: !(Maybe [FunctionConfiguration])-    , _lfrsStatus     :: !Int+    { _lfrsNextMarker     :: !(Maybe Text)+    , _lfrsFunctions      :: !(Maybe [FunctionConfiguration])+    , _lfrsResponseStatus :: !Int     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'ListFunctionsResponse' with the minimum fields required to make a request.@@ -132,15 +132,15 @@ -- -- * 'lfrsFunctions' ----- * 'lfrsStatus'+-- * 'lfrsResponseStatus' listFunctionsResponse-    :: Int -- ^ 'lfrsStatus'+    :: Int -- ^ 'lfrsResponseStatus'     -> ListFunctionsResponse-listFunctionsResponse pStatus_ =+listFunctionsResponse pResponseStatus_ =     ListFunctionsResponse'     { _lfrsNextMarker = Nothing     , _lfrsFunctions = Nothing-    , _lfrsStatus = pStatus_+    , _lfrsResponseStatus = pResponseStatus_     }  -- | A string, present if there are more functions.@@ -152,5 +152,5 @@ lfrsFunctions = lens _lfrsFunctions (\ s a -> s{_lfrsFunctions = a}) . _Default . _Coerce;  -- | The response status code.-lfrsStatus :: Lens' ListFunctionsResponse Int-lfrsStatus = lens _lfrsStatus (\ s a -> s{_lfrsStatus = a});+lfrsResponseStatus :: Lens' ListFunctionsResponse Int+lfrsResponseStatus = lens _lfrsResponseStatus (\ s a -> s{_lfrsResponseStatus = a});

@@ -43,8 +43,8 @@     , EventSourceMappingConfiguration     , eventSourceMappingConfiguration     , esmcEventSourceARN-    , esmcFunctionARN     , esmcState+    , esmcFunctionARN     , esmcUUId     , esmcLastProcessingResult     , esmcBatchSize@@ -68,8 +68,8 @@     -- * FunctionConfiguration     , FunctionConfiguration     , functionConfiguration-    , fcRuntime     , fcMemorySize+    , fcRuntime     , fcFunctionARN     , fcRole     , fcFunctionName

@@ -26,8 +26,8 @@ -- /See:/ 'eventSourceMappingConfiguration' smart constructor. data EventSourceMappingConfiguration = EventSourceMappingConfiguration'     { _esmcEventSourceARN        :: !(Maybe Text)-    , _esmcFunctionARN           :: !(Maybe Text)     , _esmcState                 :: !(Maybe Text)+    , _esmcFunctionARN           :: !(Maybe Text)     , _esmcUUId                  :: !(Maybe Text)     , _esmcLastProcessingResult  :: !(Maybe Text)     , _esmcBatchSize             :: !(Maybe Nat)@@ -41,10 +41,10 @@ -- -- * 'esmcEventSourceARN' ----- * 'esmcFunctionARN'--- -- * 'esmcState' --+-- * 'esmcFunctionARN'+-- -- * 'esmcUUId' -- -- * 'esmcLastProcessingResult'@@ -59,8 +59,8 @@ eventSourceMappingConfiguration =     EventSourceMappingConfiguration'     { _esmcEventSourceARN = Nothing-    , _esmcFunctionARN = Nothing     , _esmcState = Nothing+    , _esmcFunctionARN = Nothing     , _esmcUUId = Nothing     , _esmcLastProcessingResult = Nothing     , _esmcBatchSize = Nothing@@ -73,17 +73,17 @@ esmcEventSourceARN :: Lens' EventSourceMappingConfiguration (Maybe Text) esmcEventSourceARN = lens _esmcEventSourceARN (\ s a -> s{_esmcEventSourceARN = a}); --- | The Lambda function to invoke when AWS Lambda detects an event on the--- stream.-esmcFunctionARN :: Lens' EventSourceMappingConfiguration (Maybe Text)-esmcFunctionARN = lens _esmcFunctionARN (\ s a -> s{_esmcFunctionARN = a});- -- | The state of the event source mapping. It can be \"Creating\", -- \"Enabled\", \"Disabled\", \"Enabling\", \"Disabling\", \"Updating\", or -- \"Deleting\". esmcState :: Lens' EventSourceMappingConfiguration (Maybe Text) esmcState = lens _esmcState (\ s a -> s{_esmcState = a}); +-- | The Lambda function to invoke when AWS Lambda detects an event on the+-- stream.+esmcFunctionARN :: Lens' EventSourceMappingConfiguration (Maybe Text)+esmcFunctionARN = lens _esmcFunctionARN (\ s a -> s{_esmcFunctionARN = a});+ -- | The AWS Lambda assigned opaque identifier for the mapping. esmcUUId :: Lens' EventSourceMappingConfiguration (Maybe Text) esmcUUId = lens _esmcUUId (\ s a -> s{_esmcUUId = a});@@ -114,8 +114,8 @@           = withObject "EventSourceMappingConfiguration"               (\ x ->                  EventSourceMappingConfiguration' <$>-                   (x .:? "EventSourceArn") <*> (x .:? "FunctionArn")-                     <*> (x .:? "State")+                   (x .:? "EventSourceArn") <*> (x .:? "State") <*>+                     (x .:? "FunctionArn")                      <*> (x .:? "UUID")                      <*> (x .:? "LastProcessingResult")                      <*> (x .:? "BatchSize")@@ -234,8 +234,8 @@ -- -- /See:/ 'functionConfiguration' smart constructor. data FunctionConfiguration = FunctionConfiguration'-    { _fcRuntime      :: !(Maybe Runtime)-    , _fcMemorySize   :: !(Maybe Nat)+    { _fcMemorySize   :: !(Maybe Nat)+    , _fcRuntime      :: !(Maybe Runtime)     , _fcFunctionARN  :: !(Maybe Text)     , _fcRole         :: !(Maybe Text)     , _fcFunctionName :: !(Maybe Text)@@ -250,10 +250,10 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'fcRuntime'--- -- * 'fcMemorySize' --+-- * 'fcRuntime'+-- -- * 'fcFunctionARN' -- -- * 'fcRole'@@ -273,8 +273,8 @@     :: FunctionConfiguration functionConfiguration =     FunctionConfiguration'-    { _fcRuntime = Nothing-    , _fcMemorySize = Nothing+    { _fcMemorySize = Nothing+    , _fcRuntime = Nothing     , _fcFunctionARN = Nothing     , _fcRole = Nothing     , _fcFunctionName = Nothing@@ -285,15 +285,15 @@     , _fcDescription = Nothing     } --- | The runtime environment for the Lambda function.-fcRuntime :: Lens' FunctionConfiguration (Maybe Runtime)-fcRuntime = lens _fcRuntime (\ s a -> s{_fcRuntime = a});- -- | The memory size, in MB, you configured for the function. Must be a -- multiple of 64 MB. fcMemorySize :: Lens' FunctionConfiguration (Maybe Natural) fcMemorySize = lens _fcMemorySize (\ s a -> s{_fcMemorySize = a}) . mapping _Nat; +-- | The runtime environment for the Lambda function.+fcRuntime :: Lens' FunctionConfiguration (Maybe Runtime)+fcRuntime = lens _fcRuntime (\ s a -> s{_fcRuntime = a});+ -- | The Amazon Resource Name (ARN) assigned to the function. fcFunctionARN :: Lens' FunctionConfiguration (Maybe Text) fcFunctionARN = lens _fcFunctionARN (\ s a -> s{_fcFunctionARN = a});@@ -336,7 +336,7 @@           = withObject "FunctionConfiguration"               (\ x ->                  FunctionConfiguration' <$>-                   (x .:? "Runtime") <*> (x .:? "MemorySize") <*>+                   (x .:? "MemorySize") <*> (x .:? "Runtime") <*>                      (x .:? "FunctionArn")                      <*> (x .:? "Role")                      <*> (x .:? "FunctionName")

@@ -44,8 +44,8 @@     , EventSourceMappingConfiguration     -- * Response Lenses     , esmcEventSourceARN-    , esmcFunctionARN     , esmcState+    , esmcFunctionARN     , esmcUUId     , esmcLastProcessingResult     , esmcBatchSize

@@ -42,8 +42,8 @@     , functionConfiguration     , FunctionConfiguration     -- * Response Lenses-    , fcRuntime     , fcMemorySize+    , fcRuntime     , fcFunctionARN     , fcRole     , fcFunctionName

@@ -45,8 +45,8 @@     , functionConfiguration     , FunctionConfiguration     -- * Response Lenses-    , fcRuntime     , fcMemorySize+    , fcRuntime     , fcFunctionARN     , fcRole     , fcFunctionName

@@ -31,12 +31,12 @@ --         [ testGetFunctionConfiguration $ --             getFunctionConfiguration -----         , testUpdateEventSourceMapping $---             updateEventSourceMapping--- --         , testDeleteEventSourceMapping $ --             deleteEventSourceMapping --+--         , testUpdateEventSourceMapping $+--             updateEventSourceMapping+-- --         , testRemovePermission $ --             removePermission --@@ -82,10 +82,10 @@ --         [ testGetFunctionConfigurationResponse $ --             functionConfiguration -----         , testUpdateEventSourceMappingResponse $+--         , testDeleteEventSourceMappingResponse $ --             eventSourceMappingConfiguration -----         , testDeleteEventSourceMappingResponse $+--         , testUpdateEventSourceMappingResponse $ --             eventSourceMappingConfiguration -- --         , testRemovePermissionResponse $@@ -137,16 +137,16 @@     "GetFunctionConfiguration"     "fixture/GetFunctionConfiguration.yaml" -testUpdateEventSourceMapping :: UpdateEventSourceMapping -> TestTree-testUpdateEventSourceMapping = req-    "UpdateEventSourceMapping"-    "fixture/UpdateEventSourceMapping.yaml"- testDeleteEventSourceMapping :: DeleteEventSourceMapping -> TestTree testDeleteEventSourceMapping = req     "DeleteEventSourceMapping"     "fixture/DeleteEventSourceMapping.yaml" +testUpdateEventSourceMapping :: UpdateEventSourceMapping -> TestTree+testUpdateEventSourceMapping = req+    "UpdateEventSourceMapping"+    "fixture/UpdateEventSourceMapping.yaml"+ testRemovePermission :: RemovePermission -> TestTree testRemovePermission = req     "RemovePermission"@@ -221,19 +221,19 @@     lambda     (Proxy :: Proxy GetFunctionConfiguration) -testUpdateEventSourceMappingResponse :: EventSourceMappingConfiguration -> TestTree-testUpdateEventSourceMappingResponse = res-    "UpdateEventSourceMappingResponse"-    "fixture/UpdateEventSourceMappingResponse.proto"-    lambda-    (Proxy :: Proxy UpdateEventSourceMapping)- testDeleteEventSourceMappingResponse :: EventSourceMappingConfiguration -> TestTree testDeleteEventSourceMappingResponse = res     "DeleteEventSourceMappingResponse"     "fixture/DeleteEventSourceMappingResponse.proto"     lambda     (Proxy :: Proxy DeleteEventSourceMapping)++testUpdateEventSourceMappingResponse :: EventSourceMappingConfiguration -> TestTree+testUpdateEventSourceMappingResponse = res+    "UpdateEventSourceMappingResponse"+    "fixture/UpdateEventSourceMappingResponse.proto"+    lambda+    (Proxy :: Proxy UpdateEventSourceMapping)  testRemovePermissionResponse :: RemovePermissionResponse -> TestTree testRemovePermissionResponse = res