aboutsummaryrefslogtreecommitdiff
path: root/src/server/Model
diff options
context:
space:
mode:
authorJoris2016-04-16 21:35:50 +0200
committerJoris2016-04-16 21:35:50 +0200
commit3a88115d118f8256f3ff034dc359df42a9e4051c (patch)
tree76bee981b0e2cbcf7501eb4afe2686ea7bc2710b /src/server/Model
parent06ccc38b65f0f4da2046ac97de447cd1ad061425 (diff)
Responsive header
Diffstat (limited to 'src/server/Model')
-rw-r--r--src/server/Model/Message/Key.hs1
-rw-r--r--src/server/Model/Message/Translations.hs5
2 files changed, 6 insertions, 0 deletions
diff --git a/src/server/Model/Message/Key.hs b/src/server/Model/Message/Key.hs
index 6d48682..32c7856 100644
--- a/src/server/Model/Message/Key.hs
+++ b/src/server/Model/Message/Key.hs
@@ -61,6 +61,7 @@ data Key =
| Monthly
| SingularMonthlyCount
| PluralMonthlyCount
+ | PaymentsTitle
| Payment
| Payments
diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs
index e31d2df..973b756 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -235,6 +235,11 @@ m l PluralMonthlyCount =
English -> "{1} monthly payments totalling {2}"
French -> "{1} paiements mensuels comptabilisant {2}"
+m l PaymentsTitle =
+ case l of
+ English -> "Payments"
+ French -> "Paiements"
+
m l Payment =
case l of
English -> "payment"