From 892a7dd19a92fc18767984e624b8a5026dce61e4 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Tue, 11 Aug 2015 21:32:10 +0200
Subject: Showing server sides generated messages from the client

---
 src/server/Model/Message/Translations.hs | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

(limited to 'src/server/Model/Message/Translations.hs')

diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs
index 289b714..2cc1761 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -14,6 +14,31 @@ getNonFormattedMessage = m
 
 m :: Lang -> Key -> Text
 
+m l SharedCost =
+  case l of
+    English -> "Shared Cost"
+    French  -> "Partage des frais"
+
+m l SignIn =
+  case l of
+    English -> "Sign in"
+    French  -> "Connexion"
+
+m l SendEmailFail =
+  case l of
+    English -> "Sorry, we failed to send you the sign up email."
+    French  -> "Désolé, nous n'avons pas pu vous envoyer le courriel de connexion."
+
+m l Unauthorized =
+  case l of
+    English -> "You are not authorized to sign in."
+    French  -> "Vous n'êtes pas authorisé à vous connecter."
+
+m l EnterValidEmail =
+  case l of
+    English -> "Please enter a valid email address."
+    French  -> "Entrez s'il vous plait un email valide."
+
 m l January =
   case l of
     English -> "January"
-- 
cgit v1.2.3