Haskell: mime-mail-ses 中不支持 TLS 错误

Haskell: TLS not supported error in mime-mail-ses

当我尝试使用 mime-mail-ses 包发送电子邮件时收到 "TlsNotSupported" 错误消息。我阅读了这篇文档(如下),它似乎为 STARTTLS(与 TLS 相反)指定了端口号,但是 mime-mail-ses 或 mime-mail 似乎都没有指定端口号的方法,如果这实际上是一种补救措施的话问题。

https://docs.aws.amazon.com/ses/latest/DeveloperGuide/smtp-connect.html

ses = SES seFrom seTo seAccessKey seSecretKey seSessionToken seRegion

sMail' = simpleMail' mFrom mTo body L.empty

main = do  
  manager <- newManager defaultManagerSettings  
  renderSendMailSES manager ses sMail'

我收到以下消息:

Exception: HttpExceptionRequest Request {  
  ...
  port     = 443
  ...}  
TlsNotSupported

问题是 defaultManagerSettings 不提供 TLS 支持。相反,您需要使用支持 TLS 的管理器,例如 with: