diff --git a/src/Vervis/Foundation.hs b/src/Vervis/Foundation.hs index 4d7a31d..53de4d9 100644 --- a/src/Vervis/Foundation.hs +++ b/src/Vervis/Foundation.hs @@ -474,7 +474,7 @@ instance AccountSendEmail App where sendVerifyEmail uname email url = do sent <- sendMail (Address (Just uname) email) (MailVerifyAccount url) unless sent $ do - setMessage "Mail sending disabed, please contact admin" + setMessage "Mail sending disabled, please contact admin" ur <- getUrlRender $logWarn $ T.concat [ "Verification email NOT SENT for user " @@ -484,7 +484,7 @@ instance AccountSendEmail App where sendNewPasswordEmail uname email url = do sent <- sendMail (Address (Just uname) email) (MailResetPassphrase url) unless sent $ do - setMessage "Mail sending disabed, please contact admin" + setMessage "Mail sending disabled, please contact admin" ur <- getUrlRender $logWarn $ T.concat ["Password reset email NOT SENT for user "