diff options
author | Joris | 2016-06-04 11:02:43 +0200 |
---|---|---|
committer | Joris | 2016-06-04 11:02:43 +0200 |
commit | 38896af4281d2e191cbde15836a23e4c0274fff6 (patch) | |
tree | 0d7df152cc84beaa79cc9fa055db1e7992c4ac91 /src/server/Model | |
parent | 9dfa7a7e2c6fac564a456b11623c04d0b26fbce5 (diff) |
Add mean payment by month
Diffstat (limited to 'src/server/Model')
-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 7c48e71..4a49900 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -72,6 +72,7 @@ data Key = | Overall | ByMonths | By + | Mean -- Income diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs index f593c49..3ceb7a3 100644 --- a/src/server/Model/Message/Translations.hs +++ b/src/server/Model/Message/Translations.hs @@ -277,6 +277,11 @@ m l By = English -> "by" French -> "par" +m l Mean = + case l of + English -> "Mean: {0}" + French -> "En moyenne : {0}" + -- Income m l CumulativeIncomesSince = |