Translating payment screen except dates

1 files changed, 24 insertions, 0 deletions

diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs
index d680e6e..5a626ed 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -160,3 +160,27 @@ m l Date =
   case l of
     English -> "{2} {1}, {3}"
     French -> "{1} {2} {3}"
+
+-- Validation
+
+m l CategoryRequired =
+  case l of
+    English -> "The category is required."
+    French -> "La catégorie est requise."
+
+m l CostRequired =
+  case l of
+    English -> "The cost is required."
+    French -> "Le coût est requis."
+
+m l CostMustBeNumber =
+  case l of
+    English -> "The cost must be a number."
+    French -> "Le coût doit être un nombre."
+
+-- Payments
+
+m l Add =
+  case l of
+    English -> "Add"
+    French  -> "Ajouter"