diff --git a/antiope-sqs.cabal b/antiope-sqs.cabal
--- a/antiope-sqs.cabal
+++ b/antiope-sqs.cabal
@@ -2,10 +2,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 4958f16654a42939e6825e585d5cad3ba3c54cf3265428db90ea75a78a03c8f8
+-- hash: ef0a5de16d53fa131c1274fd964a9e88b9ac5ad1d3c3d288ee5722ebd5a5ba6f
 
 name:           antiope-sqs
-version:        5.0.1
+version:        6.0.0
 description:    Please see the README on Github at <https://github.com/arbor/antiope#readme>
 category:       Services
 homepage:       https://github.com/arbor/antiope#readme
@@ -28,7 +28,6 @@
 library
   exposed-modules:
       Antiope.SQS
-      Antiope.SQS.Types
   other-modules:
       Paths_antiope_sqs
   hs-source-dirs:
diff --git a/src/Antiope/SQS.hs b/src/Antiope/SQS.hs
--- a/src/Antiope/SQS.hs
+++ b/src/Antiope/SQS.hs
@@ -1,28 +1,23 @@
 module Antiope.SQS
-( QueueUrl(..)
-, SQSError(..)
-, readQueue
-, drainQueue
-, ackMessage
-, ackMessages
-, messageInBody
-, messageToS3Uri
-, messageToS3Uri'
-) where
+  ( QueueUrl(..)
+  , SQSError(..)
+  , readQueue
+  , drainQueue
+  , ackMessage
+  , ackMessages
+  , mBody
+  ) where
 
-import Antiope.S3          (S3Uri (..))
-import Antiope.SQS.Types   (QueueUrl (QueueUrl), SQSError (DeleteMessageBatchError))
+import Antiope.Messages    (QueueUrl (QueueUrl), SQSError (DeleteMessageBatchError))
 import Control.Lens
 import Control.Monad       (join)
 import Control.Monad.Loops (unfoldWhileM)
-import Data.Aeson.Lens
 import Data.Maybe          (catMaybes)
-import Data.Text           (Text, pack)
+import Data.Text           (pack)
 import Network.AWS         (MonadAWS)
 import Network.AWS.SQS
 
-import qualified Antiope.Messages as Z
-import qualified Network.AWS      as AWS
+import qualified Network.AWS as AWS
 
 -- | Reads the specified SQS queue once returning a bath of messages
 readQueue :: MonadAWS m
@@ -60,19 +55,3 @@
         [] -> return $ Right ()
         _  -> return $ Left DeleteMessageBatchError
     else return $ Left DeleteMessageBatchError
-
--- Extract the "Message" content in the body if have
-messageInBody :: Text -> Maybe Text
-messageInBody body = body ^? key "Message" . _String
-{-# DEPRECATED messageInBody
-    "The export of messageInBody is deprecated.  Use the one from Antiope.Messages instead" #-}
-
-messageToS3Uri :: Message -> Maybe S3Uri
-messageToS3Uri = Z.messageToS3Uri
-{-# DEPRECATED messageToS3Uri
-    "The export of messageToS3Uri is deprecated.  Use the one from Antiope.Messages instead" #-}
-
-messageToS3Uri' :: Text -> Maybe S3Uri
-messageToS3Uri' = Z.messageToS3Uri'
-{-# DEPRECATED messageToS3Uri'
-  "The export of messageToS3Uri' is deprecated.  Use the one from Antiope.Messages instead" #-}
diff --git a/src/Antiope/SQS/Types.hs b/src/Antiope/SQS/Types.hs
deleted file mode 100644
--- a/src/Antiope/SQS/Types.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module Antiope.SQS.Types
-  ( module X
-  ) where
-
-import Antiope.Messages.Types as X