aboutsummaryrefslogtreecommitdiff
path: root/src/server/Model
diff options
context:
space:
mode:
authorJoris2016-11-13 11:58:22 +0100
committerJoris2016-11-13 11:58:22 +0100
commitede7b4fade5c396b47d386bd616e05805622b647 (patch)
tree3b9152ace8d02687151046ad2f67b625b8ccda00 /src/server/Model
parent86a96decdb8892b10c5314eb916ef15a64204450 (diff)
Show a different message on weekly report if there were no activity during the previous week
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 e64cfb5..d00d8b8 100644
--- a/src/server/Model/Message/Key.hs
+++ b/src/server/Model/Message/Key.hs
@@ -131,6 +131,7 @@ data Key =
-- Weekly report
| WeeklyReport
+ | WeeklyReportEmpty
| PaymentCreated
| PaymentsCreated
| PaymentEdited
diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs
index cf11a5e..23e3a6c 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -492,6 +492,11 @@ m l WeeklyReport =
English -> "Weekly report"
French -> "Rapport hebdomadaire"
+m l WeeklyReportEmpty =
+ case l of
+ English -> "No activity the previous week."
+ French -> "Pas d'activité la semaine passée."
+
m l PaymentCreated =
case l of
English -> "{1} payment created:"