diff options
| -rw-r--r-- | src/server/Model/Message/Translations.hs | 4 | ||||
| -rw-r--r-- | src/server/SendMail.hs | 1 |
2 files changed, 2 insertions, 3 deletions
diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs index 5a626ed..7bc821e 100644 --- a/src/server/Model/Message/Translations.hs +++ b/src/server/Model/Message/Translations.hs @@ -42,12 +42,12 @@ m l SendEmailFail = m l Unauthorized = case l of English -> "You are not authorized to sign in." - French -> "Tu n'es pas authorisé à te connecter." + French -> "Tu n'es pas autorisé à te connecter." m l EnterValidEmail = case l of English -> "Please enter a valid email address." - French -> "Entre un email valide." + French -> "Ton courriel n'est pas valide." m l SignInUsed = case l of diff --git a/src/server/SendMail.hs b/src/server/SendMail.hs index 09d3d59..e57f345 100644 --- a/src/server/SendMail.hs +++ b/src/server/SendMail.hs @@ -6,7 +6,6 @@ module SendMail import Data.Text (Text) import qualified Data.Text as T -import qualified Data.Text.Lazy as LT import Data.Either (isLeft) import Control.Exception (SomeException, try) |