diff --git a/hs-aws-lambda.cabal b/hs-aws-lambda.cabal
--- a/hs-aws-lambda.cabal
+++ b/hs-aws-lambda.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           hs-aws-lambda
-version:        0.1.0.3
+version:        0.1.0.4
 synopsis:       A modern and easy-to-use wrapper for Docker-based Lambda implementations
 description:    Please see the README on GitHub at <https://github.com/RobertFischer/hs-aws-lambda#readme>
 category:       AWS
diff --git a/src/AWS/Lambda/RuntimeAPI.hs b/src/AWS/Lambda/RuntimeAPI.hs
--- a/src/AWS/Lambda/RuntimeAPI.hs
+++ b/src/AWS/Lambda/RuntimeAPI.hs
@@ -2,20 +2,27 @@
 	( runLambda
 	) where
 
-import AWS.Lambda.RuntimeAPI.Types
-import Data.Aeson ( encode, eitherDecode' )
-import Data.List ( find )
-import System.Environment ( lookupEnv )
-import Text.Read ( readMaybe )
-import UnliftIO
-import qualified Data.ByteString.Char8 as C8
-import qualified Data.CaseInsensitive as CI
-import qualified Data.Map.Strict as Map
-import qualified Network.HTTP.Client as HTTP
+import           AWS.Lambda.RuntimeAPI.Types
+import           Control.DeepSeq              (NFData)
+import           Control.Exception.Safe       (MonadThrow)
+import           Control.Monad                (forever, void)
+import           Data.Aeson                   (FromJSON, ToJSON, eitherDecode',
+                                               encode)
+import qualified Data.ByteString.Char8        as C8
+import qualified Data.CaseInsensitive         as CI
+import           Data.List                    (find)
+import qualified Data.Map.Strict              as Map
+import           Data.String                  (IsString (..))
+import           Data.Text                    (Text)
+import qualified Data.Text                    as Text
+import           Data.Typeable                (typeOf)
+import qualified Network.HTTP.Client          as HTTP
 import qualified Network.HTTP.Client.Internal as HTTP
-import qualified Network.HTTP.Types.Header as HTTP
-import qualified Network.HTTP.Types.Status as HTTP
-import qualified Data.Text as Text
+import qualified Network.HTTP.Types.Header    as HTTP
+import qualified Network.HTTP.Types.Status    as HTTP
+import           System.Environment           (lookupEnv)
+import           Text.Read                    (readMaybe)
+import           UnliftIO
 
 cts :: Text -> String
 cts = Text.unpack
diff --git a/src/AWS/Lambda/RuntimeAPI/Types.hs b/src/AWS/Lambda/RuntimeAPI/Types.hs
--- a/src/AWS/Lambda/RuntimeAPI/Types.hs
+++ b/src/AWS/Lambda/RuntimeAPI/Types.hs
@@ -8,20 +8,15 @@
 		, ErrorInfo
 		) where
 
-import           Control.DeepSeq        (NFData, NFData1)
-import           Control.Exception.Safe (MonadThrow, throw)
-import           Control.Monad          (forever, void)
-import           Data.Aeson             (FromJSON, FromJSON1, Options, ToJSON,
-                                         ToJSON1)
-import qualified Data.Aeson             as JSON
-import qualified Data.Char              as Char
-import           Data.Function          ((&))
-import           Data.String            (IsString (..), fromString)
-import           Data.Text              (Text)
-import           Data.Typeable          (typeOf)
-import           Data.Word              (Word64)
+import           Control.DeepSeq     (NFData, NFData1)
+import           Data.Aeson          (FromJSON, FromJSON1, Options, ToJSON,
+                                      ToJSON1)
+import qualified Data.Aeson          as JSON
+import qualified Data.Char           as Char
+import           Data.Text           (Text)
+import           Data.Word           (Word64)
 import           GHC.Generics
-import qualified Network.HTTP.Client    as HTTP
+import qualified Network.HTTP.Client as HTTP
 
 -- | Our implementation of how to map the field names to JSON labels
 modifyFieldLabel :: String -> String
@@ -61,7 +56,8 @@
 -- | Represents the data provided to an invocation of the lambda
 data LambdaInvocation payload = LambdaInvocation
 	{ liAwsRequestId :: Text      -- ^ The unique ID for this request
-	, liDeadlineMs :: Word        64 -- ^ The timetsamp of the deadline in Unix time
+	, liDeadlineMs
+		:: Word64 -- ^ The timetsamp of the deadline in Unix time
 	, liInvokedFunctionArn :: Text-- ^ This function's ARN
 	, liTraceId :: Text           -- ^ The details about this AWS X-Ray trace
 	, liMobileMetadata