aboutsummaryrefslogtreecommitdiff
path: root/src/executable/haskell/Service
diff options
context:
space:
mode:
Diffstat (limited to 'src/executable/haskell/Service')
-rw-r--r--src/executable/haskell/Service/MailService.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/executable/haskell/Service/MailService.hs b/src/executable/haskell/Service/MailService.hs
index 3a5bfd0..a59dddf 100644
--- a/src/executable/haskell/Service/MailService.hs
+++ b/src/executable/haskell/Service/MailService.hs
@@ -22,7 +22,7 @@ send isMock mail =
else do
result <-
left (T.pack . show) <$>
- (try (Mime.renderSendMail . getMimeMail $ mail) :: IO (Either SomeException ()))
+ (try (Mime.renderSendMailCustom "sendmail" ["-t"] . getMimeMail $ mail) :: IO (Either SomeException ()))
case result of
Left err ->
Logging.loggingLogger Logging.LevelError "" . T.concat $