diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.2.0.2`
+`1.3.0`
 
 
 ## Description
diff --git a/amazonka-cloudtrail.cabal b/amazonka-cloudtrail.cabal
--- a/amazonka-cloudtrail.cabal
+++ b/amazonka-cloudtrail.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-cloudtrail
-version:               1.2.0.2
+version:               1.3.0
 synopsis:              Amazon CloudTrail SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -79,7 +79,7 @@
         , Network.AWS.CloudTrail.Types.Sum
 
     build-depends:
-          amazonka-core == 1.2.0.*
+          amazonka-core == 1.3.0.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-cloudtrail-test
@@ -99,9 +99,9 @@
         , Test.AWS.CloudTrail.Internal
 
     build-depends:
-          amazonka-core == 1.2.0.*
-        , amazonka-test == 1.2.0.*
-        , amazonka-cloudtrail == 1.2.0.*
+          amazonka-core == 1.3.0.*
+        , amazonka-test == 1.3.0.*
+        , amazonka-cloudtrail == 1.3.0.*
         , base
         , bytestring
         , lens
diff --git a/gen/Network/AWS/CloudTrail.hs b/gen/Network/AWS/CloudTrail.hs
--- a/gen/Network/AWS/CloudTrail.hs
+++ b/gen/Network/AWS/CloudTrail.hs
@@ -59,33 +59,33 @@
     -- ** InvalidCloudWatchLogsRoleARNException
     , _InvalidCloudWatchLogsRoleARNException
 
-    -- ** InvalidTrailNameException
-    , _InvalidTrailNameException
-
     -- ** InvalidLookupAttributesException
     , _InvalidLookupAttributesException
 
-    -- ** TrailNotFoundException
-    , _TrailNotFoundException
-
-    -- ** CloudWatchLogsDeliveryUnavailableException
-    , _CloudWatchLogsDeliveryUnavailableException
+    -- ** InvalidTrailNameException
+    , _InvalidTrailNameException
 
     -- ** InvalidSNSTopicNameException
     , _InvalidSNSTopicNameException
 
-    -- ** InvalidCloudWatchLogsLogGroupARNException
-    , _InvalidCloudWatchLogsLogGroupARNException
+    -- ** CloudWatchLogsDeliveryUnavailableException
+    , _CloudWatchLogsDeliveryUnavailableException
 
+    -- ** TrailNotFoundException
+    , _TrailNotFoundException
+
     -- ** InvalidS3BucketNameException
     , _InvalidS3BucketNameException
 
-    -- ** InvalidNextTokenException
-    , _InvalidNextTokenException
+    -- ** InvalidCloudWatchLogsLogGroupARNException
+    , _InvalidCloudWatchLogsLogGroupARNException
 
     -- ** S3BucketDoesNotExistException
     , _S3BucketDoesNotExistException
 
+    -- ** InvalidNextTokenException
+    , _InvalidNextTokenException
+
     -- ** InvalidMaxResultsException
     , _InvalidMaxResultsException
 
@@ -134,8 +134,8 @@
     , Event
     , event
     , eUsername
-    , eEventTime
     , eResources
+    , eEventTime
     , eCloudTrailEvent
     , eEventName
     , eEventId
diff --git a/gen/Network/AWS/CloudTrail/CreateTrail.hs b/gen/Network/AWS/CloudTrail/CreateTrail.hs
--- a/gen/Network/AWS/CloudTrail/CreateTrail.hs
+++ b/gen/Network/AWS/CloudTrail/CreateTrail.hs
@@ -49,7 +49,7 @@
     , ctrsIncludeGlobalServiceEvents
     , ctrsCloudWatchLogsRoleARN
     , ctrsS3BucketName
-    , ctrsStatus
+    , ctrsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -196,7 +196,7 @@
     , _ctrsIncludeGlobalServiceEvents :: !(Maybe Bool)
     , _ctrsCloudWatchLogsRoleARN      :: !(Maybe Text)
     , _ctrsS3BucketName               :: !(Maybe Text)
-    , _ctrsStatus                     :: !Int
+    , _ctrsResponseStatus             :: !Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'CreateTrailResponse' with the minimum fields required to make a request.
@@ -217,11 +217,11 @@
 --
 -- * 'ctrsS3BucketName'
 --
--- * 'ctrsStatus'
+-- * 'ctrsResponseStatus'
 createTrailResponse
-    :: Int -- ^ 'ctrsStatus'
+    :: Int -- ^ 'ctrsResponseStatus'
     -> CreateTrailResponse
-createTrailResponse pStatus_ =
+createTrailResponse pResponseStatus_ =
     CreateTrailResponse'
     { _ctrsS3KeyPrefix = Nothing
     , _ctrsSNSTopicName = Nothing
@@ -230,7 +230,7 @@
     , _ctrsIncludeGlobalServiceEvents = Nothing
     , _ctrsCloudWatchLogsRoleARN = Nothing
     , _ctrsS3BucketName = Nothing
-    , _ctrsStatus = pStatus_
+    , _ctrsResponseStatus = pResponseStatus_
     }
 
 -- | Specifies the Amazon S3 key prefix that precedes the name of the bucket
@@ -268,5 +268,5 @@
 ctrsS3BucketName = lens _ctrsS3BucketName (\ s a -> s{_ctrsS3BucketName = a});
 
 -- | The response status code.
-ctrsStatus :: Lens' CreateTrailResponse Int
-ctrsStatus = lens _ctrsStatus (\ s a -> s{_ctrsStatus = a});
+ctrsResponseStatus :: Lens' CreateTrailResponse Int
+ctrsResponseStatus = lens _ctrsResponseStatus (\ s a -> s{_ctrsResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/DeleteTrail.hs b/gen/Network/AWS/CloudTrail/DeleteTrail.hs
--- a/gen/Network/AWS/CloudTrail/DeleteTrail.hs
+++ b/gen/Network/AWS/CloudTrail/DeleteTrail.hs
@@ -33,7 +33,7 @@
     , deleteTrailResponse
     , DeleteTrailResponse
     -- * Response Lenses
-    , drsStatus
+    , drsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -99,22 +99,22 @@
 --
 -- /See:/ 'deleteTrailResponse' smart constructor.
 newtype DeleteTrailResponse = DeleteTrailResponse'
-    { _drsStatus :: Int
+    { _drsResponseStatus :: Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'DeleteTrailResponse' with the minimum fields required to make a request.
 --
 -- Use one of the following lenses to modify other fields as desired:
 --
--- * 'drsStatus'
+-- * 'drsResponseStatus'
 deleteTrailResponse
-    :: Int -- ^ 'drsStatus'
+    :: Int -- ^ 'drsResponseStatus'
     -> DeleteTrailResponse
-deleteTrailResponse pStatus_ =
+deleteTrailResponse pResponseStatus_ =
     DeleteTrailResponse'
-    { _drsStatus = pStatus_
+    { _drsResponseStatus = pResponseStatus_
     }
 
 -- | The response status code.
-drsStatus :: Lens' DeleteTrailResponse Int
-drsStatus = lens _drsStatus (\ s a -> s{_drsStatus = a});
+drsResponseStatus :: Lens' DeleteTrailResponse Int
+drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/DescribeTrails.hs b/gen/Network/AWS/CloudTrail/DescribeTrails.hs
--- a/gen/Network/AWS/CloudTrail/DescribeTrails.hs
+++ b/gen/Network/AWS/CloudTrail/DescribeTrails.hs
@@ -35,7 +35,7 @@
     , DescribeTrailsResponse
     -- * Response Lenses
     , dtrsTrailList
-    , dtrsStatus
+    , dtrsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -104,8 +104,8 @@
 --
 -- /See:/ 'describeTrailsResponse' smart constructor.
 data DescribeTrailsResponse = DescribeTrailsResponse'
-    { _dtrsTrailList :: !(Maybe [Trail])
-    , _dtrsStatus    :: !Int
+    { _dtrsTrailList      :: !(Maybe [Trail])
+    , _dtrsResponseStatus :: !Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'DescribeTrailsResponse' with the minimum fields required to make a request.
@@ -114,14 +114,14 @@
 --
 -- * 'dtrsTrailList'
 --
--- * 'dtrsStatus'
+-- * 'dtrsResponseStatus'
 describeTrailsResponse
-    :: Int -- ^ 'dtrsStatus'
+    :: Int -- ^ 'dtrsResponseStatus'
     -> DescribeTrailsResponse
-describeTrailsResponse pStatus_ =
+describeTrailsResponse pResponseStatus_ =
     DescribeTrailsResponse'
     { _dtrsTrailList = Nothing
-    , _dtrsStatus = pStatus_
+    , _dtrsResponseStatus = pResponseStatus_
     }
 
 -- | The list of trails.
@@ -129,5 +129,5 @@
 dtrsTrailList = lens _dtrsTrailList (\ s a -> s{_dtrsTrailList = a}) . _Default . _Coerce;
 
 -- | The response status code.
-dtrsStatus :: Lens' DescribeTrailsResponse Int
-dtrsStatus = lens _dtrsStatus (\ s a -> s{_dtrsStatus = a});
+dtrsResponseStatus :: Lens' DescribeTrailsResponse Int
+dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/GetTrailStatus.hs b/gen/Network/AWS/CloudTrail/GetTrailStatus.hs
--- a/gen/Network/AWS/CloudTrail/GetTrailStatus.hs
+++ b/gen/Network/AWS/CloudTrail/GetTrailStatus.hs
@@ -44,7 +44,7 @@
     , gtsrsLatestCloudWatchLogsDeliveryError
     , gtsrsLatestNotificationTime
     , gtsrsStopLoggingTime
-    , gtsrsStatus
+    , gtsrsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -129,7 +129,7 @@
     , _gtsrsLatestCloudWatchLogsDeliveryError :: !(Maybe Text)
     , _gtsrsLatestNotificationTime            :: !(Maybe POSIX)
     , _gtsrsStopLoggingTime                   :: !(Maybe POSIX)
-    , _gtsrsStatus                            :: !Int
+    , _gtsrsResponseStatus                    :: !Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'GetTrailStatusResponse' with the minimum fields required to make a request.
@@ -154,11 +154,11 @@
 --
 -- * 'gtsrsStopLoggingTime'
 --
--- * 'gtsrsStatus'
+-- * 'gtsrsResponseStatus'
 getTrailStatusResponse
-    :: Int -- ^ 'gtsrsStatus'
+    :: Int -- ^ 'gtsrsResponseStatus'
     -> GetTrailStatusResponse
-getTrailStatusResponse pStatus_ =
+getTrailStatusResponse pResponseStatus_ =
     GetTrailStatusResponse'
     { _gtsrsLatestDeliveryError = Nothing
     , _gtsrsStartLoggingTime = Nothing
@@ -169,7 +169,7 @@
     , _gtsrsLatestCloudWatchLogsDeliveryError = Nothing
     , _gtsrsLatestNotificationTime = Nothing
     , _gtsrsStopLoggingTime = Nothing
-    , _gtsrsStatus = pStatus_
+    , _gtsrsResponseStatus = pResponseStatus_
     }
 
 -- | Displays any Amazon S3 error that CloudTrail encountered when attempting
@@ -223,5 +223,5 @@
 gtsrsStopLoggingTime = lens _gtsrsStopLoggingTime (\ s a -> s{_gtsrsStopLoggingTime = a}) . mapping _Time;
 
 -- | The response status code.
-gtsrsStatus :: Lens' GetTrailStatusResponse Int
-gtsrsStatus = lens _gtsrsStatus (\ s a -> s{_gtsrsStatus = a});
+gtsrsResponseStatus :: Lens' GetTrailStatusResponse Int
+gtsrsResponseStatus = lens _gtsrsResponseStatus (\ s a -> s{_gtsrsResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/LookupEvents.hs b/gen/Network/AWS/CloudTrail/LookupEvents.hs
--- a/gen/Network/AWS/CloudTrail/LookupEvents.hs
+++ b/gen/Network/AWS/CloudTrail/LookupEvents.hs
@@ -53,7 +53,7 @@
     -- * Response Lenses
     , lersNextToken
     , lersEvents
-    , lersStatus
+    , lersResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -167,9 +167,9 @@
 --
 -- /See:/ 'lookupEventsResponse' smart constructor.
 data LookupEventsResponse = LookupEventsResponse'
-    { _lersNextToken :: !(Maybe Text)
-    , _lersEvents    :: !(Maybe [Event])
-    , _lersStatus    :: !Int
+    { _lersNextToken      :: !(Maybe Text)
+    , _lersEvents         :: !(Maybe [Event])
+    , _lersResponseStatus :: !Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'LookupEventsResponse' with the minimum fields required to make a request.
@@ -180,15 +180,15 @@
 --
 -- * 'lersEvents'
 --
--- * 'lersStatus'
+-- * 'lersResponseStatus'
 lookupEventsResponse
-    :: Int -- ^ 'lersStatus'
+    :: Int -- ^ 'lersResponseStatus'
     -> LookupEventsResponse
-lookupEventsResponse pStatus_ =
+lookupEventsResponse pResponseStatus_ =
     LookupEventsResponse'
     { _lersNextToken = Nothing
     , _lersEvents = Nothing
-    , _lersStatus = pStatus_
+    , _lersResponseStatus = pResponseStatus_
     }
 
 -- | The token to use to get the next page of results after a previous API
@@ -207,5 +207,5 @@
 lersEvents = lens _lersEvents (\ s a -> s{_lersEvents = a}) . _Default . _Coerce;
 
 -- | The response status code.
-lersStatus :: Lens' LookupEventsResponse Int
-lersStatus = lens _lersStatus (\ s a -> s{_lersStatus = a});
+lersResponseStatus :: Lens' LookupEventsResponse Int
+lersResponseStatus = lens _lersResponseStatus (\ s a -> s{_lersResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/StartLogging.hs b/gen/Network/AWS/CloudTrail/StartLogging.hs
--- a/gen/Network/AWS/CloudTrail/StartLogging.hs
+++ b/gen/Network/AWS/CloudTrail/StartLogging.hs
@@ -33,7 +33,7 @@
     , startLoggingResponse
     , StartLoggingResponse
     -- * Response Lenses
-    , srsStatus
+    , srsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -99,22 +99,22 @@
 --
 -- /See:/ 'startLoggingResponse' smart constructor.
 newtype StartLoggingResponse = StartLoggingResponse'
-    { _srsStatus :: Int
+    { _srsResponseStatus :: Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'StartLoggingResponse' with the minimum fields required to make a request.
 --
 -- Use one of the following lenses to modify other fields as desired:
 --
--- * 'srsStatus'
+-- * 'srsResponseStatus'
 startLoggingResponse
-    :: Int -- ^ 'srsStatus'
+    :: Int -- ^ 'srsResponseStatus'
     -> StartLoggingResponse
-startLoggingResponse pStatus_ =
+startLoggingResponse pResponseStatus_ =
     StartLoggingResponse'
-    { _srsStatus = pStatus_
+    { _srsResponseStatus = pResponseStatus_
     }
 
 -- | The response status code.
-srsStatus :: Lens' StartLoggingResponse Int
-srsStatus = lens _srsStatus (\ s a -> s{_srsStatus = a});
+srsResponseStatus :: Lens' StartLoggingResponse Int
+srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/StopLogging.hs b/gen/Network/AWS/CloudTrail/StopLogging.hs
--- a/gen/Network/AWS/CloudTrail/StopLogging.hs
+++ b/gen/Network/AWS/CloudTrail/StopLogging.hs
@@ -36,7 +36,7 @@
     , stopLoggingResponse
     , StopLoggingResponse
     -- * Response Lenses
-    , slrsStatus
+    , slrsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -104,22 +104,22 @@
 --
 -- /See:/ 'stopLoggingResponse' smart constructor.
 newtype StopLoggingResponse = StopLoggingResponse'
-    { _slrsStatus :: Int
+    { _slrsResponseStatus :: Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'StopLoggingResponse' with the minimum fields required to make a request.
 --
 -- Use one of the following lenses to modify other fields as desired:
 --
--- * 'slrsStatus'
+-- * 'slrsResponseStatus'
 stopLoggingResponse
-    :: Int -- ^ 'slrsStatus'
+    :: Int -- ^ 'slrsResponseStatus'
     -> StopLoggingResponse
-stopLoggingResponse pStatus_ =
+stopLoggingResponse pResponseStatus_ =
     StopLoggingResponse'
-    { _slrsStatus = pStatus_
+    { _slrsResponseStatus = pResponseStatus_
     }
 
 -- | The response status code.
-slrsStatus :: Lens' StopLoggingResponse Int
-slrsStatus = lens _slrsStatus (\ s a -> s{_slrsStatus = a});
+slrsResponseStatus :: Lens' StopLoggingResponse Int
+slrsResponseStatus = lens _slrsResponseStatus (\ s a -> s{_slrsResponseStatus = a});
diff --git a/gen/Network/AWS/CloudTrail/Types.hs b/gen/Network/AWS/CloudTrail/Types.hs
--- a/gen/Network/AWS/CloudTrail/Types.hs
+++ b/gen/Network/AWS/CloudTrail/Types.hs
@@ -21,15 +21,15 @@
     , _MaximumNumberOfTrailsExceededException
     , _InsufficientSNSTopicPolicyException
     , _InvalidCloudWatchLogsRoleARNException
-    , _InvalidTrailNameException
     , _InvalidLookupAttributesException
-    , _TrailNotFoundException
-    , _CloudWatchLogsDeliveryUnavailableException
+    , _InvalidTrailNameException
     , _InvalidSNSTopicNameException
-    , _InvalidCloudWatchLogsLogGroupARNException
+    , _CloudWatchLogsDeliveryUnavailableException
+    , _TrailNotFoundException
     , _InvalidS3BucketNameException
-    , _InvalidNextTokenException
+    , _InvalidCloudWatchLogsLogGroupARNException
     , _S3BucketDoesNotExistException
+    , _InvalidNextTokenException
     , _InvalidMaxResultsException
     , _TrailAlreadyExistsException
     , _InvalidS3PrefixException
@@ -41,8 +41,8 @@
     , Event
     , event
     , eUsername
-    , eEventTime
     , eResources
+    , eEventTime
     , eCloudTrailEvent
     , eEventName
     , eEventId
@@ -136,31 +136,36 @@
 _InvalidCloudWatchLogsRoleARNException =
     _ServiceError . hasStatus 400 . hasCode "InvalidCloudWatchLogsRoleArn"
 
+-- | Occurs when an invalid lookup attribute is specified.
+_InvalidLookupAttributesException :: AsError a => Getting (First ServiceError) a ServiceError
+_InvalidLookupAttributesException =
+    _ServiceError . hasStatus 400 . hasCode "InvalidLookupAttributes"
+
 -- | This exception is thrown when the provided trail name is not valid.
 _InvalidTrailNameException :: AsError a => Getting (First ServiceError) a ServiceError
 _InvalidTrailNameException =
     _ServiceError . hasStatus 400 . hasCode "InvalidTrailName"
 
--- | Occurs when an invalid lookup attribute is specified.
-_InvalidLookupAttributesException :: AsError a => Getting (First ServiceError) a ServiceError
-_InvalidLookupAttributesException =
-    _ServiceError . hasStatus 400 . hasCode "InvalidLookupAttributes"
+-- | This exception is thrown when the provided SNS topic name is not valid.
+_InvalidSNSTopicNameException :: AsError a => Getting (First ServiceError) a ServiceError
+_InvalidSNSTopicNameException =
+    _ServiceError . hasStatus 400 . hasCode "InvalidSnsTopicName"
 
+-- | Cannot set a CloudWatch Logs delivery for this region.
+_CloudWatchLogsDeliveryUnavailableException :: AsError a => Getting (First ServiceError) a ServiceError
+_CloudWatchLogsDeliveryUnavailableException =
+    _ServiceError . hasStatus 400 . hasCode "CloudWatchLogsDeliveryUnavailable"
+
 -- | This exception is thrown when the trail with the given name is not
 -- found.
 _TrailNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
 _TrailNotFoundException =
     _ServiceError . hasStatus 404 . hasCode "TrailNotFound"
 
--- | Cannot set a CloudWatch Logs delivery for this region.
-_CloudWatchLogsDeliveryUnavailableException :: AsError a => Getting (First ServiceError) a ServiceError
-_CloudWatchLogsDeliveryUnavailableException =
-    _ServiceError . hasStatus 400 . hasCode "CloudWatchLogsDeliveryUnavailable"
-
--- | This exception is thrown when the provided SNS topic name is not valid.
-_InvalidSNSTopicNameException :: AsError a => Getting (First ServiceError) a ServiceError
-_InvalidSNSTopicNameException =
-    _ServiceError . hasStatus 400 . hasCode "InvalidSnsTopicName"
+-- | This exception is thrown when the provided S3 bucket name is not valid.
+_InvalidS3BucketNameException :: AsError a => Getting (First ServiceError) a ServiceError
+_InvalidS3BucketNameException =
+    _ServiceError . hasStatus 400 . hasCode "InvalidS3BucketName"
 
 -- | This exception is thrown when the provided CloudWatch log group is not
 -- valid.
@@ -168,21 +173,16 @@
 _InvalidCloudWatchLogsLogGroupARNException =
     _ServiceError . hasStatus 400 . hasCode "InvalidCloudWatchLogsLogGroupArn"
 
--- | This exception is thrown when the provided S3 bucket name is not valid.
-_InvalidS3BucketNameException :: AsError a => Getting (First ServiceError) a ServiceError
-_InvalidS3BucketNameException =
-    _ServiceError . hasStatus 400 . hasCode "InvalidS3BucketName"
+-- | This exception is thrown when the specified S3 bucket does not exist.
+_S3BucketDoesNotExistException :: AsError a => Getting (First ServiceError) a ServiceError
+_S3BucketDoesNotExistException =
+    _ServiceError . hasStatus 404 . hasCode "S3BucketDoesNotExist"
 
 -- | Invalid token or token that was previously used in a request with
 -- different parameters. This exception is thrown if the token is invalid.
 _InvalidNextTokenException :: AsError a => Getting (First ServiceError) a ServiceError
 _InvalidNextTokenException =
     _ServiceError . hasStatus 400 . hasCode "InvalidNextToken"
-
--- | This exception is thrown when the specified S3 bucket does not exist.
-_S3BucketDoesNotExistException :: AsError a => Getting (First ServiceError) a ServiceError
-_S3BucketDoesNotExistException =
-    _ServiceError . hasStatus 404 . hasCode "S3BucketDoesNotExist"
 
 -- | This exception is thrown if the limit specified is invalid.
 _InvalidMaxResultsException :: AsError a => Getting (First ServiceError) a ServiceError
diff --git a/gen/Network/AWS/CloudTrail/Types/Product.hs b/gen/Network/AWS/CloudTrail/Types/Product.hs
--- a/gen/Network/AWS/CloudTrail/Types/Product.hs
+++ b/gen/Network/AWS/CloudTrail/Types/Product.hs
@@ -26,8 +26,8 @@
 -- /See:/ 'event' smart constructor.
 data Event = Event'
     { _eUsername        :: !(Maybe Text)
-    , _eEventTime       :: !(Maybe POSIX)
     , _eResources       :: !(Maybe [Resource])
+    , _eEventTime       :: !(Maybe POSIX)
     , _eCloudTrailEvent :: !(Maybe Text)
     , _eEventName       :: !(Maybe Text)
     , _eEventId         :: !(Maybe Text)
@@ -39,10 +39,10 @@
 --
 -- * 'eUsername'
 --
--- * 'eEventTime'
---
 -- * 'eResources'
 --
+-- * 'eEventTime'
+--
 -- * 'eCloudTrailEvent'
 --
 -- * 'eEventName'
@@ -53,8 +53,8 @@
 event =
     Event'
     { _eUsername = Nothing
-    , _eEventTime = Nothing
     , _eResources = Nothing
+    , _eEventTime = Nothing
     , _eCloudTrailEvent = Nothing
     , _eEventName = Nothing
     , _eEventId = Nothing
@@ -65,14 +65,14 @@
 eUsername :: Lens' Event (Maybe Text)
 eUsername = lens _eUsername (\ s a -> s{_eUsername = a});
 
--- | The date and time of the event returned.
-eEventTime :: Lens' Event (Maybe UTCTime)
-eEventTime = lens _eEventTime (\ s a -> s{_eEventTime = a}) . mapping _Time;
-
 -- | A list of resources referenced by the event returned.
 eResources :: Lens' Event [Resource]
 eResources = lens _eResources (\ s a -> s{_eResources = a}) . _Default . _Coerce;
 
+-- | The date and time of the event returned.
+eEventTime :: Lens' Event (Maybe UTCTime)
+eEventTime = lens _eEventTime (\ s a -> s{_eEventTime = a}) . mapping _Time;
+
 -- | A JSON string that contains a representation of the event returned.
 eCloudTrailEvent :: Lens' Event (Maybe Text)
 eCloudTrailEvent = lens _eCloudTrailEvent (\ s a -> s{_eCloudTrailEvent = a});
@@ -90,8 +90,8 @@
           = withObject "Event"
               (\ x ->
                  Event' <$>
-                   (x .:? "Username") <*> (x .:? "EventTime") <*>
-                     (x .:? "Resources" .!= mempty)
+                   (x .:? "Username") <*> (x .:? "Resources" .!= mempty)
+                     <*> (x .:? "EventTime")
                      <*> (x .:? "CloudTrailEvent")
                      <*> (x .:? "EventName")
                      <*> (x .:? "EventId"))
diff --git a/gen/Network/AWS/CloudTrail/UpdateTrail.hs b/gen/Network/AWS/CloudTrail/UpdateTrail.hs
--- a/gen/Network/AWS/CloudTrail/UpdateTrail.hs
+++ b/gen/Network/AWS/CloudTrail/UpdateTrail.hs
@@ -52,7 +52,7 @@
     , utrsIncludeGlobalServiceEvents
     , utrsCloudWatchLogsRoleARN
     , utrsS3BucketName
-    , utrsStatus
+    , utrsResponseStatus
     ) where
 
 import           Network.AWS.CloudTrail.Types
@@ -198,7 +198,7 @@
     , _utrsIncludeGlobalServiceEvents :: !(Maybe Bool)
     , _utrsCloudWatchLogsRoleARN      :: !(Maybe Text)
     , _utrsS3BucketName               :: !(Maybe Text)
-    , _utrsStatus                     :: !Int
+    , _utrsResponseStatus             :: !Int
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'UpdateTrailResponse' with the minimum fields required to make a request.
@@ -219,11 +219,11 @@
 --
 -- * 'utrsS3BucketName'
 --
--- * 'utrsStatus'
+-- * 'utrsResponseStatus'
 updateTrailResponse
-    :: Int -- ^ 'utrsStatus'
+    :: Int -- ^ 'utrsResponseStatus'
     -> UpdateTrailResponse
-updateTrailResponse pStatus_ =
+updateTrailResponse pResponseStatus_ =
     UpdateTrailResponse'
     { _utrsS3KeyPrefix = Nothing
     , _utrsSNSTopicName = Nothing
@@ -232,7 +232,7 @@
     , _utrsIncludeGlobalServiceEvents = Nothing
     , _utrsCloudWatchLogsRoleARN = Nothing
     , _utrsS3BucketName = Nothing
-    , _utrsStatus = pStatus_
+    , _utrsResponseStatus = pResponseStatus_
     }
 
 -- | Specifies the Amazon S3 key prefix that precedes the name of the bucket
@@ -270,5 +270,5 @@
 utrsS3BucketName = lens _utrsS3BucketName (\ s a -> s{_utrsS3BucketName = a});
 
 -- | The response status code.
-utrsStatus :: Lens' UpdateTrailResponse Int
-utrsStatus = lens _utrsStatus (\ s a -> s{_utrsStatus = a});
+utrsResponseStatus :: Lens' UpdateTrailResponse Int
+utrsResponseStatus = lens _utrsResponseStatus (\ s a -> s{_utrsResponseStatus = a});