diff --git a/azure-email/Azure/Email.hs b/azure-email/Azure/Email.hs index bf5a206..795be82 100644 --- a/azure-email/Azure/Email.hs +++ b/azure-email/Azure/Email.hs @@ -1,7 +1,7 @@ {-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeOperators #-} -module Azure.Email where +module Azure.Email (sendEmail, sendEmailEither) where import Azure.Types (AzureEmailRequest (..)) import Crypto.Hash.SHA256 (hash, hmac) @@ -20,6 +20,18 @@ import qualified Data.ByteString.Base64 as B64 import qualified Data.ByteString.Char8 as C8 import qualified Data.Text as Text +sendEmail :: + MonadIO m => + Text -> + m () +sendEmail apiSecret = undefined + +sendEmailEither :: + MonadIO m => + Text -> + m (Either Text ()) +sendEmailEither apiSecret = undefined + type SendEmailApi = "emails:send" :> QueryParam' '[Required, Strict] "api-version" Text diff --git a/azure-email/azure-email.cabal b/azure-email/azure-email.cabal index 1e974f9..dccf94a 100644 --- a/azure-email/azure-email.cabal +++ b/azure-email/azure-email.cabal @@ -56,7 +56,6 @@ library , base64-bytestring , bytestring , cryptohash-sha256 - , http-client , http-client-tls , servant , servant-client