diff options
| author | Joris | 2016-08-08 20:58:17 +0200 |
|---|---|---|
| committer | Joris | 2016-08-08 20:58:17 +0200 |
| commit | 8816cf758119a6a2073e561c8df297a833630986 (patch) | |
| tree | 20e63f3c0de15945b818a6d7a78359f9134b5e82 /src/server/Model/Message | |
| parent | b54d8e45fc8784d8fa6eaa03f58536b7a19cf70b (diff) | |
Show incomes in a table and update like payments are updated
Diffstat (limited to 'src/server/Model/Message')
| -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 2723dd5..4ffc890 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -97,6 +97,7 @@ data Key = | CumulativeIncomesSince | Income | MonthlyNetIncomes + | AddIncome | IncomeNotDeleted | IncomeDate | IncomeAmount diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs index 5dcf428..32b58fc 100644 --- a/src/server/Model/Message/Translations.hs +++ b/src/server/Model/Message/Translations.hs @@ -374,6 +374,11 @@ m l MonthlyNetIncomes = English -> "Monthly incomes" French -> "Revenus mensuels nets" +m l AddIncome = + case l of + English -> "Add an income" + French -> "Ajouter un revenu" + m l IncomeNotDeleted = case l of English -> "The income could not have been deleted." |