aboutsummaryrefslogtreecommitdiff
path: root/src/server
diff options
context:
space:
mode:
Diffstat (limited to 'src/server')
-rw-r--r--src/server/Model/Message/Translations.hs4
-rw-r--r--src/server/SendMail.hs1
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)