aboutsummaryrefslogtreecommitdiff
path: root/common
diff options
context:
space:
mode:
authorJoris2019-10-12 11:23:10 +0200
committerJoris2019-10-12 11:23:10 +0200
commit52331eeadce8d250564851c25fc965172640bc55 (patch)
treee634c6d232d9a28384499fe19caeb80288d05df9 /common
parent7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b (diff)
Implement client routing
Diffstat (limited to 'common')
-rw-r--r--common/src/Common/Message/Key.hs3
-rw-r--r--common/src/Common/Message/Translation.hs10
2 files changed, 13 insertions, 0 deletions
diff --git a/common/src/Common/Message/Key.hs b/common/src/Common/Message/Key.hs
index e460d3e..c2fde58 100644
--- a/common/src/Common/Message/Key.hs
+++ b/common/src/Common/Message/Key.hs
@@ -150,3 +150,6 @@ data Key =
| WeeklyReport_PaymentDeleted Int
| WeeklyReport_PaymentEdited Int
| WeeklyReport_Title
+
+ | NotFound_Message
+ | NotFound_LinkMessage
diff --git a/common/src/Common/Message/Translation.hs b/common/src/Common/Message/Translation.hs
index 6b9e7be..3173561 100644
--- a/common/src/Common/Message/Translation.hs
+++ b/common/src/Common/Message/Translation.hs
@@ -693,3 +693,13 @@ m l WeeklyReport_Title =
case l of
English -> "Weekly report"
French -> "Rapport hebdomadaire"
+
+m l NotFound_Message =
+ case l of
+ English -> "There is nothing here!"
+ French -> "Vous vous êtes perdu."
+
+m l NotFound_LinkMessage =
+ case l of
+ English -> "Go back to the home page."
+ French -> "Retour à l’accueil."