From ee3027b53aad38178f4945c459a94489f4997507 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 4 Oct 2015 21:15:15 +0200
Subject: Do not authorize negative incomes

---
 src/server/Model/Message/Translations.hs | 5 +++++
 1 file changed, 5 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 f594833..f34cbd2 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -203,6 +203,11 @@ m l IncomeMustBeNonNullNumber =
     English -> "The income must be a non-null integer."
     French  -> "Le revenu doit être un entier non nul."
 
+m l IncomeMustBePositiveNumber =
+  case l of
+    English -> "The income must be a positive integer."
+    French  -> "Le revenu doit être un entier positif."
+
 -- Payments
 
 m l Add =
-- 
cgit v1.2.3