diff options
author | Joris | 2016-06-26 13:59:31 +0200 |
---|---|---|
committer | Joris | 2016-06-26 13:59:31 +0200 |
commit | 27bf42c165e5a9fa242e0679fca621f2a6dc4adb (patch) | |
tree | 5a528b3daefbf1fdd7f4418d8399b43a91ee1533 /src | |
parent | 0dc740d8f64b31ff49b7cfb51ddc2dde7b5c121e (diff) |
Add missing AddIncome message
Diffstat (limited to 'src')
-rw-r--r-- | src/server/Model/Message/Key.hs | 1 | ||||
-rw-r--r-- | src/server/Model/Message/Translations.hs | 5 |
2 files changed, 6 insertions, 0 deletions
diff --git a/src/server/Model/Message/Key.hs b/src/server/Model/Message/Key.hs index a88d2b8..84ff486 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -96,6 +96,7 @@ data Key = | IncomeDate | IncomeAmount | ConfirmIncomeDelete + | Add -- Form diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs index 3b91d17..a29b84e 100644 --- a/src/server/Model/Message/Translations.hs +++ b/src/server/Model/Message/Translations.hs @@ -369,6 +369,11 @@ m l ConfirmIncomeDelete = English -> "Are you sure to delete this income ?" French -> "Voulez-vous vraiment supprimer ce revenu ?" +m l Add = + case l of + English -> "Add" + French -> "Ajouter" + -- Form error m l Empty = |