From cfca18262c1ff48dcb683ddab7d03cf8e55573ff Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 24 Mar 2017 09:21:04 +0000
Subject: Features/categories

---
 src/server/Model/Message/Translations.hs | 115 ++++++++++++++++++++++++++++++-
 1 file changed, 112 insertions(+), 3 deletions(-)

(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 23e3a6c..6565344 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -295,6 +295,63 @@ m l NoPayment =
     English -> "No payment found from your search criteria."
     French  -> "Aucun paiement ne correspond à vos critères de recherches."
 
+-- Categories
+
+m l Categories =
+  case l of
+    English -> "Categories"
+    French  -> "Catégories"
+
+m l NoCategories =
+  case l of
+    English -> "No category."
+    French  -> "Aucune catégorie."
+
+m l CategoryNotDeleted =
+  case l of
+    English -> "The category could not have been deleted."
+    French  -> "La catégorie n'a pas pu être supprimé."
+
+m l AddCategory =
+  case l of
+    English -> "Add an category"
+    French  -> "Ajouter une catégorie"
+
+m l CloneCategory =
+  case l of
+    English -> "Clone an category"
+    French  -> "Cloner une catégorie"
+
+m l EditCategory =
+  case l of
+    English -> "Edit an category"
+    French  -> "Modifier une catégorie"
+
+m l ConfirmCategoryDelete =
+  case l of
+    English -> "Are you sure to delete this category ?"
+    French  -> "Voulez-vous vraiment supprimer cette catégorie ?"
+
+m l CategoryName =
+  case l of
+    English -> "Name"
+    French  -> "Nom"
+
+m l CategoryColor =
+  case l of
+    English -> "Color"
+    French  -> "Couleur"
+
+m l Color =
+  case l of
+    English -> "Color"
+    French  -> "Couleur"
+
+m l UsedCategory =
+  case l of
+    English -> "This category is currently being used"
+    French  -> "Cette catégorie est utilisée actuellement"
+
 -- Statistics
 
 m l Statistics =
@@ -322,6 +379,16 @@ m l PaymentCost =
     English -> "Cost"
     French  -> "Coût"
 
+m l PaymentDate =
+  case l of
+    English -> "Date"
+    French  -> "Date"
+
+m l PaymentCategory =
+  case l of
+    English -> "Category"
+    French  -> "Catégorie"
+
 m l PaymentPunctual =
   case l of
     English -> "Punctual"
@@ -359,6 +426,11 @@ m l CumulativeIncomesSince =
     English -> "Cumulative incomes since {1}"
     French  -> "Revenus nets cumulés depuis le {1}"
 
+m l NoIncome =
+  case l of
+    English -> "No income."
+    French  -> "Aucun revenu."
+
 m l Income =
   case l of
     English -> "Income"
@@ -394,6 +466,11 @@ m l IncomeAmount =
     English -> "Amount"
     French  -> "Montant"
 
+m l IncomeDate =
+  case l of
+    English -> "Date"
+    French  -> "Date"
+
 m l ConfirmIncomeDelete =
   case l of
     English -> "Are you sure to delete this income ?"
@@ -426,6 +503,11 @@ m l InvalidInt =
     English -> "Integer required"
     French  -> "Entier requis"
 
+m l InvalidCategory =
+  case l of
+    English -> "Invalid category"
+    French  -> "Catégorie invalide"
+
 m l SmallerIntThan =
   case l of
     English -> "Integer bigger than {1} or equal required"
@@ -468,6 +550,21 @@ m l DeleteIncomeError =
     English -> "Error at income deletion"
     French  -> "Erreur lors de la suppression du revenu"
 
+m l CreateCategoryError =
+  case l of
+    English -> "Error at category creation"
+    French  -> "Erreur lors de la création de la catégorie"
+
+m l EditCategoryError =
+  case l of
+    English -> "Error at category edition"
+    French  -> "Erreur lors de la modification de la catégorie"
+
+m l DeleteCategoryError =
+  case l of
+    English -> "Error at category deletion"
+    French  -> "Erreur lors de la suppression de la catégorie"
+
 m l SignOutError =
   case l of
     English -> "Error at sign out"
@@ -485,6 +582,13 @@ m l Undo =
     English -> "Undo"
     French  -> "Annuler"
 
+-- Page not found
+
+m l PageNotFound =
+  case l of
+    English -> "Page not found"
+    French  -> "Page introuvable"
+
 -- Weekly report
 
 m l WeeklyReport =
@@ -579,6 +683,11 @@ m l IsNotPayedFrom =
 
 -- Http error
 
+m l BadUrl =
+  case l of
+    English -> "URL not valid"
+    French  -> "l'URL n'est pas valide"
+
 m l Timeout =
   case l of
     English -> "Timeout server error"
@@ -589,7 +698,7 @@ m l NetworkError =
     English -> "Network can not be reached"
     French  -> "Le serveur n'est pas accessible"
 
-m l UnexpectedPayload =
+m l BadPayload =
   case l of
-    English -> "Unexpected payload server error"
-    French  -> "Contenu inattendu du en provenance du serveur"
+    English -> "Bad payload server error"
+    French  -> "Contenu inattendu en provenance du serveur"
-- 
cgit v1.2.3