diff --git a/aws-ses-easy.cabal b/aws-ses-easy.cabal
--- a/aws-ses-easy.cabal
+++ b/aws-ses-easy.cabal
@@ -2,10 +2,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 4a1665dedd80d3f81d6afde6fc2e45d73d6b1fdbc8668fb88dc7324bd531c2fc
+-- hash: 2af2e52057d79537f56a932c925ed483263b42f5b8080e360e995529eace2f1d
 
 name:           aws-ses-easy
-version:        0.0.0
+version:        0.1.0
 synopsis:       Wrapper over Amazonka's SES
 description:    Opinionated use of Amazonka's SES for ease
 category:       Network
diff --git a/library/Aws/Ses/Easy/Service.hs b/library/Aws/Ses/Easy/Service.hs
--- a/library/Aws/Ses/Easy/Service.hs
+++ b/library/Aws/Ses/Easy/Service.hs
@@ -13,13 +13,13 @@
 
 
 class Monad m => Service m where
-  sendEmail :: Email -> (Email -> m ()) -> m ()
+  sendEmail :: Email -> m () -> m ()
 
-sendEmail' :: (MonadIO m, MonadReader s m, MonadCatch m) => (s -> Aws.Env) -> Email -> (Email -> m ()) -> m ()
+sendEmail' :: (MonadIO m, MonadReader s m, MonadCatch m) => (s -> Aws.Env) -> Email -> m () -> m ()
 sendEmail' getEnv email failed = do
   env <- asks getEnv
   let msg = fromEmail email
-  _ <- catching_ Aws._MessageRejected (awsSendEmail env msg >> return ()) (failed email)
+  _ <- catching_ Aws._MessageRejected (awsSendEmail env msg >> return ()) failed
   return ()
   where
     awsSendEmail env msg = liftIO $ Aws.runResourceT . Aws.runAWS env $ Aws.send msg
diff --git a/package.yaml b/package.yaml
--- a/package.yaml
+++ b/package.yaml
@@ -1,5 +1,5 @@
 name: aws-ses-easy
-version: '0.0.0'
+version: '0.1.0'
 github: jxv/aws-ses-easy
 license: BSD3
 license-file: LICENSE.md