sup39/vervis
1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-27 15:34:51 +09:00
Code Issues Activity

Fix typo in message text

Browse source
This commit is contained in:
fr33domlover 2018-04-09 00:38:40 +00:00
parent 3cc2810d4e
commit c768659f57
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Vervis/Foundation.hs
View file

@ -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 "