diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.4.0`
+`1.4.1`
 
 
 ## Description
diff --git a/amazonka-importexport.cabal b/amazonka-importexport.cabal
--- a/amazonka-importexport.cabal
+++ b/amazonka-importexport.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-importexport
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon Import/Export SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -61,7 +61,7 @@
         , Network.AWS.ImportExport.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-importexport-test
@@ -81,9 +81,9 @@
         , Test.AWS.ImportExport.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-importexport == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-importexport == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/ImportExport/CancelJob.hs b/gen/Network/AWS/ImportExport/CancelJob.hs
--- a/gen/Network/AWS/ImportExport/CancelJob.hs
+++ b/gen/Network/AWS/ImportExport/CancelJob.hs
@@ -87,6 +87,8 @@
 
 instance Hashable CancelJob
 
+instance NFData CancelJob
+
 instance ToHeaders CancelJob where
         toHeaders = const mempty
 
@@ -132,3 +134,5 @@
 -- | The response status code.
 crsResponseStatus :: Lens' CancelJobResponse Int
 crsResponseStatus = lens _crsResponseStatus (\ s a -> s{_crsResponseStatus = a});
+
+instance NFData CancelJobResponse
diff --git a/gen/Network/AWS/ImportExport/CreateJob.hs b/gen/Network/AWS/ImportExport/CreateJob.hs
--- a/gen/Network/AWS/ImportExport/CreateJob.hs
+++ b/gen/Network/AWS/ImportExport/CreateJob.hs
@@ -132,6 +132,8 @@
 
 instance Hashable CreateJob
 
+instance NFData CreateJob
+
 instance ToHeaders CreateJob where
         toHeaders = const mempty
 
@@ -220,3 +222,5 @@
 -- | The response status code.
 cjrsResponseStatus :: Lens' CreateJobResponse Int
 cjrsResponseStatus = lens _cjrsResponseStatus (\ s a -> s{_cjrsResponseStatus = a});
+
+instance NFData CreateJobResponse
diff --git a/gen/Network/AWS/ImportExport/GetShippingLabel.hs b/gen/Network/AWS/ImportExport/GetShippingLabel.hs
--- a/gen/Network/AWS/ImportExport/GetShippingLabel.hs
+++ b/gen/Network/AWS/ImportExport/GetShippingLabel.hs
@@ -176,6 +176,8 @@
 
 instance Hashable GetShippingLabel
 
+instance NFData GetShippingLabel
+
 instance ToHeaders GetShippingLabel where
         toHeaders = const mempty
 
@@ -236,3 +238,5 @@
 -- | The response status code.
 gslrsResponseStatus :: Lens' GetShippingLabelResponse Int
 gslrsResponseStatus = lens _gslrsResponseStatus (\ s a -> s{_gslrsResponseStatus = a});
+
+instance NFData GetShippingLabelResponse
diff --git a/gen/Network/AWS/ImportExport/GetStatus.hs b/gen/Network/AWS/ImportExport/GetStatus.hs
--- a/gen/Network/AWS/ImportExport/GetStatus.hs
+++ b/gen/Network/AWS/ImportExport/GetStatus.hs
@@ -121,6 +121,8 @@
 
 instance Hashable GetStatus
 
+instance NFData GetStatus
+
 instance ToHeaders GetStatus where
         toHeaders = const mempty
 
@@ -286,3 +288,5 @@
 -- | The response status code.
 gsrsResponseStatus :: Lens' GetStatusResponse Int
 gsrsResponseStatus = lens _gsrsResponseStatus (\ s a -> s{_gsrsResponseStatus = a});
+
+instance NFData GetStatusResponse
diff --git a/gen/Network/AWS/ImportExport/ListJobs.hs b/gen/Network/AWS/ImportExport/ListJobs.hs
--- a/gen/Network/AWS/ImportExport/ListJobs.hs
+++ b/gen/Network/AWS/ImportExport/ListJobs.hs
@@ -114,6 +114,8 @@
 
 instance Hashable ListJobs
 
+instance NFData ListJobs
+
 instance ToHeaders ListJobs where
         toHeaders = const mempty
 
@@ -168,3 +170,5 @@
 -- | The response status code.
 ljrsResponseStatus :: Lens' ListJobsResponse Int
 ljrsResponseStatus = lens _ljrsResponseStatus (\ s a -> s{_ljrsResponseStatus = a});
+
+instance NFData ListJobsResponse
diff --git a/gen/Network/AWS/ImportExport/Types.hs b/gen/Network/AWS/ImportExport/Types.hs
--- a/gen/Network/AWS/ImportExport/Types.hs
+++ b/gen/Network/AWS/ImportExport/Types.hs
@@ -88,6 +88,8 @@
       | has (hasCode "ThrottlingException" . hasStatus 400) e =
           Just "throttling_exception"
       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
+      | has (hasStatus 504) e = Just "gateway_timeout"
+      | has (hasStatus 502) e = Just "bad_gateway"
       | has (hasStatus 503) e = Just "service_unavailable"
       | has (hasStatus 500) e = Just "general_server_error"
       | has (hasStatus 509) e = Just "limit_exceeded"
diff --git a/gen/Network/AWS/ImportExport/Types/Product.hs b/gen/Network/AWS/ImportExport/Types/Product.hs
--- a/gen/Network/AWS/ImportExport/Types/Product.hs
+++ b/gen/Network/AWS/ImportExport/Types/Product.hs
@@ -60,6 +60,8 @@
 
 instance Hashable Artifact
 
+instance NFData Artifact
+
 -- | Representation of a job returned by the ListJobs operation.
 --
 -- /See:/ 'job' smart constructor.
@@ -119,3 +121,5 @@
                 <*> (x .@ "CreationDate")
 
 instance Hashable Job
+
+instance NFData Job
diff --git a/gen/Network/AWS/ImportExport/Types/Sum.hs b/gen/Network/AWS/ImportExport/Types/Sum.hs
--- a/gen/Network/AWS/ImportExport/Types/Sum.hs
+++ b/gen/Network/AWS/ImportExport/Types/Sum.hs
@@ -38,6 +38,7 @@
         Import -> "Import"
 
 instance Hashable     JobType
+instance NFData       JobType
 instance ToByteString JobType
 instance ToQuery      JobType
 instance ToHeader     JobType
diff --git a/gen/Network/AWS/ImportExport/UpdateJob.hs b/gen/Network/AWS/ImportExport/UpdateJob.hs
--- a/gen/Network/AWS/ImportExport/UpdateJob.hs
+++ b/gen/Network/AWS/ImportExport/UpdateJob.hs
@@ -125,6 +125,8 @@
 
 instance Hashable UpdateJob
 
+instance NFData UpdateJob
+
 instance ToHeaders UpdateJob where
         toHeaders = const mempty
 
@@ -188,3 +190,5 @@
 -- | The response status code.
 ujrsResponseStatus :: Lens' UpdateJobResponse Int
 ujrsResponseStatus = lens _ujrsResponseStatus (\ s a -> s{_ujrsResponseStatus = a});
+
+instance NFData UpdateJobResponse